Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#5

AW: Form nach eingabe in einer anderen Form aktualisieren

  Alt 28. Mär 2013, 23:35
Organisiere deine Daten in einer Liste TObjectList<T>
Baue dir dazu 2 Routinen SaveListToFile und LoadListFromFile .
Dann noch eine Routine ListToStringGrid und alles wird viel einfacher.

Das neue Objekt an die Liste hängen, Liste speichern und im Grid anzeigen lassen.

Die Form zur Eingabe der Daten wird ja wohl modal aufgerufen, somit kannst du folgendes machen
Delphi-Quellcode:
procedure TMainForm.NeueDaten_ButtonClick( Sender : TObject );
var
  LMyObj : TMyObj;
begin
  with TDataEditForm.Create( nil ) do
  try
    if ShowModal = mrOK then
    begin
      LMyObj := TMyObj.Create;
      StoreToObj( LMyObj ); // Methode des Eingabeformulars TDataEditForm
      MyList.Add( LMyObj );
      SaveListToFile( MyList );
      ListToStringGrid( MyList, StringGrid1 );
    end;
  finally
    Free;
  end;
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)

Geändert von Sir Rufo (28. Mär 2013 um 23:45 Uhr)
  Mit Zitat antworten Zitat