Toolbar Image wird nicht angezeigt
Verfasst: 04.09.2007 10:25
Hallo liebe PBler
wahrscheinlich ist meine Frage mit einem kleinen Klick zu lösen, aber ich weiss nicht wo ich klicken muss.
Ich habe folgende Problem.
Imagesdir$=getdir()+ "Images\"
LoadImage(#Image1, Imagesdir$ + "globe4.ico" )
LoadImage(#Image2, Imagesdir$ + "globe2.ico" )
LoadImage(#Image3, Imagesdir$ + "Control Panel 1.ico" )
If CreateToolBar(#ToolBar, WindowID(#Window_Form1))
If IsImage(#Image1)
ToolBarImageButton(#Menu_Importieren, #Image1)
EndIf
If IsImage(#Image2)
ToolBarImageButton(#Menu_Exportieren, #Image1)
EndIf
If IsImage(#Image3)
ToolBarImageButton(#Menu_Tages_Statistik, #Image1)
EndIf
EndIf
Es werden keine Icons angezeigt. Was mache ich falsch?
Schöner wäre es die Icons in einer Resourcendatei zu speichern aber wie?
es wäre klasse wenn da einer von den erfahrenden mir einen kleinen Tip geben könnte.
Gruss
Starting

wahrscheinlich ist meine Frage mit einem kleinen Klick zu lösen, aber ich weiss nicht wo ich klicken muss.
Ich habe folgende Problem.
Imagesdir$=getdir()+ "Images\"
LoadImage(#Image1, Imagesdir$ + "globe4.ico" )
LoadImage(#Image2, Imagesdir$ + "globe2.ico" )
LoadImage(#Image3, Imagesdir$ + "Control Panel 1.ico" )
If CreateToolBar(#ToolBar, WindowID(#Window_Form1))
If IsImage(#Image1)
ToolBarImageButton(#Menu_Importieren, #Image1)
EndIf
If IsImage(#Image2)
ToolBarImageButton(#Menu_Exportieren, #Image1)
EndIf
If IsImage(#Image3)
ToolBarImageButton(#Menu_Tages_Statistik, #Image1)
EndIf
EndIf
Es werden keine Icons angezeigt. Was mache ich falsch?
Schöner wäre es die Icons in einer Resourcendatei zu speichern aber wie?
es wäre klasse wenn da einer von den erfahrenden mir einen kleinen Tip geben könnte.
Gruss
Starting
