2 Labels verbinden

[Sharky]

Zitat von Hansa:

...Im Allgemeinen ist es jedoch erschreckend, zu sehen, wie wenig Beachtung der OOP geschenkt wird....

Hai Hansa,
ich erschrecke mehr wenn ich sehe das Du für solche Sachen 2 Labels verwendest.
Mit einer einfachen Verwendung von FORMAT geht das wesentlich eleganter.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  betrag : Double;
begin
  betrag := 15,25
  Label1.Caption := Format ('Betrag %f EUR',[betrag]);
end;