Einzelnen Beitrag anzeigen

Benutzerbild von Tyler
Tyler

Registriert seit: 19. Jun 2003
Ort: Berlin
241 Beiträge
 
#6

Re: Copy Pos Delete - Bin auf dem Holzweg...

  Alt 17. Jul 2004, 10:54
ola!

ich hab´s bei mir n bisschen kürzer:
Delphi-Quellcode:
        temp1 := memo1.Text;
        repeat
          i := 0;
          repeat
            i := i + 1;
          until temp1[i] = '+';
          memo2.Lines.Add(LeftStr(temp1,i-1));
          Delete(temp1,1,i);
        until temp1 = '';
hier wird der text in einem memo1 nach dem Trennzeichen "Plus" abgesucht, der Text davor erst kopiert, dann entsprechend abgeschnitten,und als separate Line in eine 2. Memobox geschrieben.


tyler
  Mit Zitat antworten Zitat