Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Eine Datei in 3 Memos laden

    Delphi
    by hibbert, 30. Dez 2004
  wie wäre es denn, wenn du den Text in eine Variable lädst.
  und dann sollte folgendes gehen:
  var text,textM1,textM2,textM2:string;
  i:integer;
  begin
  i:=pos('',text);
  textM1 := copy(text,1,i);
  delete(text,1,i + 10);
  i:=pos('',text);
  textM2 := copy(text,1,i);