Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sidorion,
9. Jan 2007
Du kannst auch alternativ mit
//______________________________________________________________________________
Procedure TDieComboBox.CreateParams(Var _Params: TCreateParams);
Begin
Inherited;
_Params.Style:=_Params.Style or WS_HSCROLL;
End;
der Liste ne horizontale Scrollbar verpassen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sidorion,
9. Jan 2007
//______________________________________________________________________________
Procedure TDieComboBox.SetListHandle(_hHandle: HWND);
Var
R:TRect;
iX:integer;
Begin
If _hHandle<>ListHandle
Then Begin
If _hHandle<>0
Then Begin