Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by marabu,
15. Nov 2006
An mehrere Links pro Zeile hatte ich bei meinem Code garnicht gedacht, aber mit PosEx() und zwei zusätzlichen Zeilen sollte es funktionieren:
procedure ExtractUrls(s, urls: TStrings; prefix: String);
var
i, iStart, iStop: Integer;
line: String;
begin
for i := 0 to Pred(s.Count) do
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by marabu,
15. Nov 2006
Guten Morgen.
Memo4.Lines.Strings ist das gleiche wie Memo4.Lines. In jedem Fall ist es eine property und kann nicht als Variable an die Prozedur Delete() übergeben werden - wie Julian dir schon geschrieben hat. Wenn du eine Position öfter verwendest, dann solltest du sie in einer Variablen zwischenspeichern und sie nicht ständig neu suchen lassen. Und wenn du deinen Code funktional gliederst,...