button mit bild

[x000x]

Zitat von Heinz-Erich:

Hi !
Wie kann mann ein tbutton umdesignen? mit nem icon?

Um speziell deine Frage zu beantworten: Mit SetWindowLong
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.)