Zitat von
CK_CK:
So:
Delphi-Quellcode:
procedure TForm1.FormShow(Sender: TObject);
var
ini: TIniFile;
a: integer;
begin
try
ini := TiniFile.Create(ExtractFilePath(ParamStr(0))+'gaugghtmlkonfig.ini');
a:= ini.ReadInteger('Allgemein', 'Erststart', 0);
if a=1 then OKRightDlg7.ShowModal;
finally
ini.Free;
end;
end;
Aso!
Die Stringstriche '' habe ich ganz übersehen!
Danke an alle