Thema: Delphi button mit bild

Einzelnen Beitrag anzeigen

Benutzerbild von x000x
x000x

Registriert seit: 21. Jan 2004
Ort: Bei Hamburg
308 Beiträge
 
Delphi XE2 Professional
 
#4

Re: button mit bild

  Alt 21. Aug 2005, 14:00
Zitat von Heinz-Erich:
Hi !
Wie kann mann ein tbutton umdesignen? mit nem icon?
Um speziell deine Frage zu beantworten: Mit MSDN-Library durchsuchenSetWindowLong
Beispiel:
1. Leeres Formular + 2 Buttons drauf
2. Im ONClick des Button2 folgenden Code einfügen
Delphi-Quellcode:
// ..
   SetWindowLong(Button1.Handle, GWL_STYLE, GetWindowLong(Button1.Handle, GWL_STYLE) or BS_ICON);
   SendMessage(Button1.Handle, BM_SETIMAGE, IMAGE_ICON, Application.Icon.Handle);
// ..
PS:
Wenn du aber eh mit VCL entwickelst, ist es einfacher, einen anderen Button zu benutzen (s.o.)
Peter
-= Gruss Peter =-
-= alias x000x =-
  Mit Zitat antworten Zitat