Einzelnen Beitrag anzeigen

mojo777

Registriert seit: 10. Sep 2003
402 Beiträge
 
#1

DBnamen im array speichern und mit einer schleife editieren

  Alt 2. Jun 2004, 17:09
Abend,

wie schaffe ich es mehrere Objektnamen, in meinem Fall Tablenamen, in einem array(const) zu verarbeiten?
Hier ein Beispiel meines Vorhabens:

Delphi-Quellcode:
function TfmHauptfenster.Commit():Integer;
const alle_datenbanken: array[0..9] of String =
        ('dmData.ibPRODUKTE_FILTERED'
        ,'dmData.ibLieferanten'
        ,'dmData.ibPRODUKTE_VOLL'
        ,'dmData.ibSteuer'
        ,'dmData.ibLieferungen'
        ,'dmData.ibAufpreisgruppen'
        ,'dmData.ibProduktgruppen'
        ,'dmData.ibEinheiten'
        ,'dmData.ibFremddb'
        ,'dmData.ibMHD');
var i:Integer;

begin
dmData.IBTransaction.Commit;
for i:=0 to high(alle_datenbanken) do
        begin
        alle_datenbanken[i].Active:=True;
        end;
end;
Seht Ihr was ich meine?

Bin dankbar für jede Anregung.

Mojo

...... mist... bin in der falschen abteilung gelandet.. sorry.. kann das einer verschieben??
Muh macht die kUh
  Mit Zitat antworten Zitat