Forum: Programmieren allgemein
by alcaeus,
13. Nov 2004
Hi Coolboarder_9,
hier ein Beispielaufruf:
var
Zahlen: IntAr; //nicht array of Integer
begin
StringTeilen(Zahlen, RichEdit1.Text);
StringTeilen(Zahlen, Memo1.Text);
StringTeilen(Zahlen, Edit1.Text);
Forum: Programmieren allgemein
by alcaeus,
13. Nov 2004
Hi Coolboarder_9,
versuchs mal so:
type IntAr = array of Integer;
procedure StringTeilen(var IntArray: IntAr; str: String);
var
i: Integer;
SL: TStringList;
begin
Forum: Programmieren allgemein
by alcaeus,
11. Nov 2004
Hi btbe,
hier ein kleines Beispiel zur Verwendung der StringList:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
SL: TStringList;
begin
SL := TStringList.Create;
Forum: Programmieren allgemein
by alcaeus,
11. Nov 2004
Je nach Delphi-Version kannst du auch die Eigenschaft DelimitedText der TStringList ausnutzen. Die Eigenschaft gibts AFAIK aber erst ab Delphi 6.
Greetz
alcaeus