Hi,
folgender Code soll mit ca. 25 Labels ausgeführt werden:
Delphi-Quellcode:
var
s1, s2 ...... : string;
begin
s1 := Form1.Label1.Caption;
Label51.Caption := ' 1 - ' + StringReplace(s1,':','',[rfReplaceAll]);
s2 := Form1.Label2.Caption;
Label52.Caption := ' 2 - ' + StringReplace(s2,':','',[rfReplaceAll]);
.................
end;
Gibts dafür eine performantere Lösung? Ich wüsste im Moment nicht wie.
Viele Grüße...