Zitat von
Cosamia:
Delphi-Quellcode:
{SpinButton malen }
NewSpinBtn := TMyJvSpinbutton.Create(NewPanel);
with NewSpinBtn do begin
Top := SPINBTNYPOS;
Left := (XPOS+intPanelWidth)-(EDITXPOS+SPINBTNWidth);
Width := SPINBTNWidth;
Height := SPINBTNHeight;
Parent := NewPanel;
EditBox := NewEdit; // <---
OnBottomClick := MyBottomClick;
OnTopClick := MyTopClick;
end;
Neue Komponente TMyJvSpinbutton mit einem Link zur EditBox erzeugen!
Grüsse Frank