Einzelnen Beitrag anzeigen

Tpercon

Registriert seit: 7. Jun 2002
638 Beiträge
 
Delphi 5 Professional
 
#21
  Alt 18. Jun 2003, 08:23
Hier nen Beispiel was aber nicht getestet ist!

Delphi-Quellcode:
procedure TForm4.FormShow(Sender: TObject);
var combosave: TIniFile;
begin
combosave := TIniFile.Create(ExtractFilePath(ParamStr(0))+'settings.ini');
try
 ComboBox1.ItemIndex:=combosave.ReadInteger('Iconpfad','Status1',0);
finally
 combosave.Free;
end;
Sowas ähnliches müßte aber bestimmt in der OH zu finden sein, hab gerade nur kein Delphi zur Hand.


Gruß
  Mit Zitat antworten Zitat