[Back to DELPHI SWAG index] [Back to Main SWAG index] [Original]

    >Is there an easy way to do multi-line
    >captions on a TButton?

    var
     btn:Longint

      btn:=GetWindowLong(Button1.Handle,GWL_STYLE);
      SetWindowLong(Button1.Handle,GWL_STYLE,btn or BS_MULTILINE);
      Button1.Caption := 'This is a multi-line Button';

     -or-

      SendMessage(Button1.Handle, BM_SETSTYLE, BS_MULTILINE,1);
      Button1.Caption := 'This is a multi-line Button';

    But the second didn't seem to want to re-draw the button with
    the Multiline Caption.  Any ideas?

[Back to DELPHI SWAG index] [Back to Main SWAG index] [Original]