Einzelnen Beitrag anzeigen

Stormy

Registriert seit: 8. Okt 2005
Ort: LPZ
73 Beiträge
 
Delphi 6 Enterprise
 
#16

Re: for- Schleife : Anfangsvariable aktualisieren

  Alt 16. Jul 2009, 10:29
Hast du evl. ein end falsch gesetzt oder irgendwo ein Try stehen??
Versuch es mal so:

Delphi-Quellcode:
k := 10;
    while k <= Length(head) do
    begin
      TabPos1 := posEx(#9,head,k);
      if TabPos1 <> 0 then
      begin
          TabPos2 := posEx('[',head,TabPos1+1);
          if TabPos2 <> 0 then
          begin
              Length1 := TabPos2-TabPos1;
              MWBeztemp := Copy(head, TabPos1,Length1);
              MWBez := MWBez+#9+MWBeztemp;
              k := TabPos2+1;
          //end;
       end
       else begin !!!!!!
       end;
    end
    else begin !!!!!!!!
    end;
  end;
  Mit Zitat antworten Zitat