Hallo zusammen,
ich will in mein Programm eine Ini-Datei implementieren, die u.a. die zuletzt gewählte Sprache enthält, so dass das Programm immer mit der korrekten Sprache gestartet wird. Allerdings wird die Ini-Datei nicht beschrieben und ich habe keine Ahnung, warum. Erzeugt wird sie und einen Fehler schmeisst der Compiler auch nicht aus.
Die Komponente ist die TLMDIniCtrl, außerdem das TextFile F.
Hier mal mein Code, vielleicht ist da ein Fehler drin?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| procedure TMAIN.InitProgram(Sender: TObject);
begin
OpenComPort;
Ini.IniFile := ExtractFilePath( Application.ExeName ) + 'Qumat11.ini';
with Ini do
begin
if not FileExists( Ini.IniFile ) then
begin
AssignFile( F, Ini.IniFile );
Rewrite( F );
CloseFile( F );
WriteString( 'Language', 'ID', 'EN' );
WriteString( 'Parameter', 'Techniker', 'Name' );
WriteString( 'Parameter', 'Flaschen-Nr', 'Quma 0000' );
end;
end;
end; |
Vielen Dank und beste Grüße,
Thomas
