Einzelnen Beitrag anzeigen

choose

Registriert seit: 2. Nov 2003
Ort: Bei Kiel, SH
729 Beiträge
 
Delphi 2006 Architect
 
#28

Re: Function, Result als stringlist?

  Alt 20. Nov 2003, 13:49
Zitat von silent:
[...]ListBox1.Items.AddStrings(bla(socket.ReceiveText, ':', sl)); [...]
ist es nicht möglich das in eine zeile zu bekommen?
Hallo silent,

das funktioniert nur, wenn bla einen Rückgabewert vom Typ TStrings hätte. Ich rate Dir aber davon ab, den Parameter sl nach Result "durchzuschleifen"...
Wenn bla in dieser Art programmiert ist
Delphi-Quellcode:
procedure bla(const AnInputString: string; const ADelimiter: string; AResult: TStrings);
begin
  Assert(Assigned(AResult));
  AResult.BeginUpdate;
  try
    //append substrings from AnInputString to AResult seperated by ADelimiter
  finally
    AResult.EndUpdate;
  end;
end;
dann könntest Du die Funktion direkt mit den Items der Listbox verwenden:
Bla(socket.ReceiveText, ':', ListBox1.Items);
gruß, choose
  Mit Zitat antworten Zitat