| |
|
|
- Page 1 - |
|
Roberto | Guten Tag Ich brauche mal wieder hilfe. Ich will machen, dass wenn ich auf ein Bild klicke eine File geöffnet wird. Wie potuto ich das machen. Hier mein bisheriger Code
declare passwindow&,e%
Windowtitle RHP Windows
Window 50,20 - 800,600
startpaint passwindow&
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
endpaint
whilenot e%
WaitInput
if Clicked 54,586;0
LoadBMP RHPVISTA.BMP,54,69;0
Waitinput
end
|
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 19.02.2009 ▲ |
|
|
|
| |
|
- Page 3 - |
|
|
Roberto | Aso jetzt Kapier ichs Vielen Dank. Arbeitest du noch an deiner Windows Version |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
| Mouse(x,y - xx,yy) statt Mouse(x,y-xx,y) ist besser
Das Minus als Parametertrennzeichen sollte von Freizeichen umgeben sein wegen der Eineindeutigkeit. |
|
|
| |
|
|
|
Paul Glatz | Ok Eigetlich mach ich das auch so |
|
|
| |
|
|
|
Roberto | Guckt mal. Ich will die Anhängede File in die Taskleiste einfügen. Aber das kleine Weisse Feld überdeckt ein teil meines Hintergrundbildes |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Roberto | Kann man das Weisse nicht irgendwie unsichtbar machen |
|
|
| Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
|
|
|
|
Paul Glatz | Irgentwie bekomme ich mit XProfan keine Tranzparenz beim Mostra einens GIF Bildes hin (
Im Anhang ein GIF ohne das weiße. |
|
|
| |
|
|
|
Roberto | Naja ist erstmal egal Paul kannst du mir hier von dem Start Button nochmal die Koordinaten Mostra. und bitte nicht die Fenstergröße ändern. KompilierenMarkierenSeparierendeclare passwindow&,e%,i%
Windowtitle RHP Système dexploitation
Window 50,20 - 800,600
LoadBMP Leiste.BMP,0,518;0
LOADBMP START.BMP,0,518;0
LOADBMP AUSSCHALTEN.BMP,500,514;0
whilenot e%
WaitInput
if Mouse(???)
if i% = 1 Ist das Startmenu offen
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0
repaintneu malen
i% = 0Starmenu zu
elseif i% = 0 es ist zu!
LoadBMP STARTPUSHED.BMP,54,91;0
repaintneu malen
i% = 1 Startmenu offen
endif
endif
endwhile
54 = X oben links (X1)
586 = Y oben links (Y1)
153 = X unten rechts (X2)
616 = Y unten Rechts ( | | | Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
| |
| | | drawPic bzw. loadBmp bei letztem Parameter -1 zeichnet mit Auslassung einer Farbnummer - das funktioniert imho nach Einladen aller Bildformate wie z.B. auch gif und bmp. |
| | | | |
| | Roberto | | | | Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
| |
| | Roberto | Und was ist der Farbcode per Weiss und der Code um Gif-bilder hochzuladen |
| | | Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^ | 20.02.2009 ▲ |
| |
| | Paul Glatz | Der Code: KompilierenMarkierenSeparierendeclare passwindow&,e%,i%
Windowtitle RHP Système dexploitation
Window 50,20 - 800,600
LoadBMP Leiste.BMP,0,518;0
LOADBMP START.BMP,0,518;0
LOADBMP AUSSCHALTEN.BMP,500,514;-1
repaint
whilenot e%
WaitInput
if Mouse(0,518 - 99,518+30)
if i% = 1 Ist das Startmenu offen
cls
LoadBMP Leiste.BMP,0,518;-1
LOADBMP START.BMP,0,518;0
LOADBMP AUSSCHALTEN.BMP,500,514;0
repaintneu malen
i% = 0Starmenu zu
elseif i% = 0 es ist zu!
LoadBMP STARTPUSHED.BMP,0,20;0
repaintneu malen
i% = 1 Startmenu offen
endif
endif
endwhile
54 = X oben links (X1)
586 = Y oben links (Y1)
153 = X unten rechts (X2)
616 = Y unten Rechts (Y2)
|
| | | | |
| | KHR | Hallo miteinander,
ich bin zwar sicher kein Xprofan-Guru. Deswegen hab ich Transparenz auch nur mit schwarz @rgb(0,0,0) hinbekommen.
Probleme mit Transparenz hatte ich auch be JPGs. Das sah dann wie ein Flickenteppich aus. Anscheinend wird durch die Komprimierung ein bißchen an den Farbtöpfen rumgedreht. |
| | | Gruß Karl-Heinz WIN XP home/Pro / XPROFAN 11 / P2CPP ATMEL + BASCOM Fan | 20.02.2009 ▲ |
| |
|
AnswerTopic-Options | 25.591 Views |
ThemeninformationenDieses Thema hat 5 subscriber: |