Edit-Feldeingabe

[smax]

Hallo,

ich wenn ich mein Programm starte, dann kann man dort in den 2 Felder-Daten eingeben die dann gespeichert werden.

Nun möchte ich das aber so machen, dass noch beim Start die Daten aus der Text datei ausgelesen werden und sofort in dem Edit-Feldangezeigt werden ohne das man vorher auf einen Button oder so drücken muss!

Wie geht das?

[MrSpock]

Hallo smax,

in der OnCreate Methode des Formulars:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
   tfData : TextFile;
   zeile  : string;
begin
   AssignFile(tfData, 'C:\lokal\Data.txt');
   Reset(tfData);
   readln(tfData, zeile);
   Edit1.Text := zeile;
   readln(tfData, zeile);
   Edit2.Text := zeile;
   CloseFile(tfData);
end;

[Luckie]

Ich glaube, er redet von seiner Ini-Datei. Und noch mal der Hinweis auf die Hilfe und TIniFile. Kuck mal, ob du da unter den Methoden der Klasse was brauchbares findest.

[smax]

Hallo,

Danke erstmal!

Wie man aus einer INI-Datei auslesen kann weiss ich ich will nur das beim Start des Programmes gleich die Daten die ich ausgelesen hab in den Edit1 Feld angezeigt werden!

Eigentlich ist es doch so wenn ich in der FormCreate procedure folgende Zeile eingebe:

Edit1.Text := 'test';

Sollte im Edit1 Feld eigentlich test stehen! Das Edit1-Feld ist aber leer!

Woran liegt das?

[Luckie]

Kann nicht sein. Wird der Inhalt eventuell zu einem späteren Zeitpunkt mit nichts überschrieben?

[smax]

Nein auch nicht!

Hier mal der ganze Code:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  zeile: string;
begin
   Edit1.Text := 'test';
end;

Und vorher wird noch im Type-Bereich die procedure dekliniert!

Ist doch alles richtig oder?

Es geht auch nicht, wenn ich ein neues Project erstelle und nur den Code zu laufen hab!

Muss ich vielleicht noch was am Feld Edit1 ändern?

[Luckie]

Steht im OnShow- oder im OnActivte-Ereignis noch was?

[smax]

Nein da sind alle Felder leer!

[Luckie]

Pack mal den Ordner mit dem Projekt mit WinZip und häng das mal an.

[smax]

Kein Problem!