| |
|
|
 Georg Hovenbitzer | Hallo zusammen,
wie kann ich ein mit Create(hSizedPic erzeugtes und DrawPic angezeigtes Bild wieder löschen ?  Ohne das Programm zu beenden und neu zu starten  |
|
|
| Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a) | 11.04.2007 ▲ |
|
|
|
|
 Frank Abbing | DeleteObject müsste das Passende sein. |
|
|
| |
|
|
|
 Georg Hovenbitzer | Hallo Frank,
hatte ich schon ohne Erfolg versucht, auch mit einem Repaint dahinter. Das Bild wird weiter angezeigt.  Muss mal probieren es auf ein Static zu legen und dieses zu zerstören.
P.S.: Geht ja auch nicht, da man es nicht angeben kann.  |
|
|
| Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a) | 11.04.2007 ▲ |
|
|
|
|
 | Nur son Vorschlag: Wenn Du mit Rectangle x,y-x1,y1 in der Hintergrundfarbe ein Rechteck drüberlegst, müsste das Bild doch weg sein oder ? |
|
|
| |
|
|
|
 Georg Hovenbitzer | Hallo Horst,
gute Idee  Werde es morgen direkt mal testen. |
|
|
| Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a) | 11.04.2007 ▲ |
|
|
|
|
 Dieter Zornow | Versuchs doch mal nach deleteobject mit CLS, funktioniert garantiert
Saluto
Dieter |
|
|
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 11.04.2007 ▲ |
|
|
|
|
 | @Georg Also bei mir klappt es  KompilierenMarkierenSeparierenDeclare bild&,pfad$
pfad$=GETDIR$(@)
bild&=Create(hPic,-1,pfad$+\test.bmp) Dein Bild einsetzen
CLS RGB(255,255,0)
DrawSizedPic bild&, 50,50-150,150;0
WAITINPUT
USEBRUSH 1,RGB(255,255,0)
USEPEN 0,1,RGB(255,255,0)
RECTANGLE 50,50-200,200
WAITINPUT
| 12.04.2007 ▲ | |
|
|
|
|
 Peter Max Müller | Und hier mit Statik: KompilierenMarkierenSeparieren $H WINDOWS.PH
DEF LoadImage(6) ! USER32,LoadImageA
Declare bild&,pfad$,image$,bmpstat&
Pfad$=GETDIR$(@)
Image$=Create(hPic,-1,pfad$+\test.bmp)Dein Bild einsetzen
CLS RGB(255,255,0)
BmpStat& = Control(STATIC,,$5400130E,50,50,150,150,%hwnd,0,%hinstance,$0)
Bild& = ~LoadImage(0,Addr(Image$),~IMAGE_BITMAP,150,150,~LR_LOADFROMFILE)
SendMessage(BmpStat&,~STM_SETIMAGE,~IMAGE_BITMAP,BILD&)
WAITINPUT
ShowWindow(BmpStat&,0)
WAITINPUT
ShowWindow(BmpStat&,1)
WAITINPUT
XProfan X3, X4ß, Win 10.1 | 12.04.2007 ▲ | |
|
|
|
|
 | @Peter Da ich PROFAN-Purist bin, sind bei mir naturalmente die Möglichkeiten von XProfan vorrangig. Daher stellt sich mir die Frage, warum per die Aufgabe, ein Bildchen zu löschen, gleich die Windows.ph zu bemühen. Schon die Zeilenzahl ist bei meinem Code kleiner und wahrscheinlich dadurch auch resourcenschonender oder  |
|
|
| |
|
|
|
 Jörg Sellmeyer | Horst Horn
@Peter Da ich PROFAN-Purist bin, sind bei mir naturalmente die Möglichkeiten von XProfan vorrangig. Daher stellt sich mir die Frage, warum per die Aufgabe, ein Bildchen zu löschen, gleich die Windows.ph zu bemühen. Schon die Zeilenzahl ist bei meinem Code kleiner und wahrscheinlich dadurch auch resourcenschonender oder 
Hallo Horst, Durch die Windows.ph aumento sich nicht die Zeilenzahl Deines Programmi! Der Compiler sieht in der *.ph-File nach Begriffen, die im Quellcode mit einer Tilde (~) eingeleitet werden und ersetzt diese durch den entsprechenden Wert aus der *.ph-File. Es ist einfach ein ausgesprochen komfortables Profanfeature. Saluto Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 12.04.2007 ▲ |
|
|
|
|
 | |
|
| |
|
|
|
 | Ne XProfan.PH aumento IMHO die Zeilenanzahl nicht - macht aber das Kompilieren lahm - das Einlesen dauert ewig... drum XPSE - keine PHs - blitzschnelle Umsetzung der Apis.  |
|
|
| |
|
|