Forum: Datenbanken
by jfheins,
14. Jun 2009
Versuchs mal so:
procedure TForm1.Button1Click(Sender: TObject);
begin
begin
Form2 := TForm2.Create(Form1);
Form2.Show;
Form2.Tabelle.Cells := ' ';
Form2.Tabelle.Cells := 'Name';
Form2.Tabelle.Cells := 'Vorname';
Form2.Tabelle.Cells := 'Strasse';
Forum: Datenbanken
by jfheins,
13. Jun 2009
Bei Suchfeld hätte ich jetzt an ein Edit gedacht ...
Forum: Datenbanken
by jfheins,
13. Jun 2009
Okay ... Quick&Dirty ginge es wohl so:// In das OnClick-Event von einem Such-Button
begin
Form2 := TForm2.Create(Form1);
Form2.Show;
Form2.Tabelle.Cells := ' ';
Form2.Tabelle.Cells := 'Name';
Form2.Tabelle.Cells := 'Vorname';
Form2.Tabelle.Cells := 'Strasse';
Form2.Tabelle.Cells := 'PLZ';
Form2.Tabelle.Cells := 'Ort';
Forum: Datenbanken
by jfheins,
13. Jun 2009
Ok, ich probiers mal:
Anstatt immer auf die Datei zuzugreifen (was übrigens auch langsam ist) machst du folgendes: Du legst dir ein Array of T_Adresse an. Wenn du eine Datei öffnest, liest du die ganze Datei in das Array.
Dann liest du die Elemente aus dem Array und schreibst sie in das Stringgrid.
Falls im Stringgrid was verändert wird, musst du die Änderung in das Array übertragen.
Beim...