Datenbank-Felder in Array

[drschubi]

Guten Morgen,

um späteren Pflegaufwand zu verringern, möchte ich die ca. 70 Datenbank-Felder einer DB in ein Array schreiben, um dann zur Laufzeit beim Lesen/Schreiben der DB mittels diesem Aaray auf die DB zuzugreifen.

Zur Zeit lese ich die Shopdaten so:

Delphi-Quellcode:

procedure TForm1.ReadShopdaten;
begin
  edshopnr.Text := zquery1.FieldByName('shopnr').AsString;
  edshopname.Text := zquery1.FieldByName('shop_name').AsString;
  edinstitute.Text := zquery1.FieldByName('institute').AsString;
  cbform_of_adress.Text := zquery1.FieldByName('form_of_adress').AsString; cbform_of_adress.ItemIndex := 0;
  cbtitle.Text := zquery1.FieldByName('title').AsString; cbtitle.ItemIndex := 0;
  edsurname.Text := zquery1.FieldByName('surname').AsString;
  edfirstname.Text := zquery1.FieldByName('firstname').AsString;
  edadress.Text := zquery1.FieldByName('adress').AsString;
  edcitycode.Text := zquery1.FieldByName('citycode').AsString;
  edcity.Text := zquery1.FieldByName('city').AsString;
..

Leider habe ich noch nie mit Arrays gearbeitet, die Delphi - Hilfe erklärt Arrays etwas umständlich, was muss ich bei Arrays beachten und wie könnte eine Lösung im Ansatz aussehen?

Wie löst Ihr diese Zugriffe ?

Vielen Dank

René