Eine TStrings Element mit for-schleife durchlaufen !

[Nillen]

Moinsen,

ich hab folgendes (sehhher simples wie ich denke) Prob :

Ich habe durch ein OpenDialog.Files eine Liste vom Typ TStrings!
Jetzt möchte ich mit einer for-schleife jedes einzelne Element dieser Liste ansprechen!

Es müsste ca so aussehn

for i=1 to Anzahl Elemente in OpenDialog.Files

Aaaber es gibt keine Methode mit der ich mir die Länge von OpenDialog.Files geben lassen kann!

Sorry für diese dumme Frage aber ich bin ein ziemlicher Delphi Newbie !

Danke schonmal

[Alexander]

:arrow: Files.Count

Nachtrag: Wenn du durch alle Dateien mit einer FOR-Schleife durch iterieren willst, dann musst du natürlich noch einen davon abziehen..

[Sharky]

Hai,

Zitat:

Zitat von Nillen

....Aaaber es gibt keine Methode mit der ich mir die Länge von OpenDialog.Files geben lassen kann!...

Warum denn nicht? ;-)

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  ndx : Integer;
begin
  if (OpenDialog1.Execute) then
  begin
    for ndx := 0 to Pred (OpenDialog1.Files.Count) do
    begin
      ShowMessage (OpenDialog1.Files[ndx]);
    end;
  end;
end;

[Robert_G]

Zitat:

Zitat von Nillen

Aaaber es gibt keine Methode mit der ich mir die Länge von OpenDialog.Files geben lassen kann!

Schon mal einen Punkt hinter files getippt? Da solltest du über ein Count stolpern. :mrgreen:

Zitat:

Zitat von Nillen

Ich habe durch ein OpenDialog.Files eine Liste vom Typ TStrings!
Jetzt möchte ich mit einer for-schleife jedes einzelne Element dieser Liste ansprechen!

Es müsste ca so aussehn

Delphi-Quellcode:

for i=1 to Anzahl Elemente in OpenDialog.Files

Fast...
In D2005 wäre es

Delphi-Quellcode:

var
  File :string;
begin
  for File in OpenDialog.Files do
    ...

in D<2005 geht es über die übliche for-to-do

Delphi-Quellcode:

  with OpenDialog do
    for i := 0 to pred(Files.Count) do
     // mache etwas mit Files[i] ...

[Nillen]

.... wenn ich das so sehe zweifle ich an meinem Verstand ! ;)

Und ich Dorfdepp hab mir die ganze Zeit die blöde Hilfe zum Typ Tstrings angekuckt und da nichts gefunden ...