Italia
Foro

Auf Bild klicken Andare

 
- 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 2 -



Paul
Glatz
Das ist dmit ich das komplette bild sehe
 
20.02.2009  
 




Paul
Glatz
Hie ein neuer Code:
KompilierenMarkierenSeparieren
declare passwindow&,e%,i%
Windowtitle RHP Windows
Window 50,20 - 900,700
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0

whilenot e%

    WaitInput

    if Mouse(54,586-54+99,586+30)

        if i% = 1  Ist das Startmenu offen

            LoadBMP RHPVISTA.BMP,54,69;0
            LoadBMP Leiste.BMP,54,586;0
            LOADBMP START.BMP,54,586;0
            repaint neu malen
            i% = 0 Starmenu zu

        elseif i% = 0  es ist zu!

            LoadBMP STARTPUSHED.BMP,54,91;0
            repaint neu malen
            i% = 1  Startmenu offen

        endif

    endif

endwhile

 
20.02.2009  
 




Roberto
Cool thx hat geklappt.
Kannst du mir noch die Maus Coordinaten Erklären.
Was bedetet das
if Mouse(54,586-54+99,586+30)
also die zahlen
 
Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^
20.02.2009  
 




Paul
Glatz
Ist schon!
KompilierenMarkierenSeparieren
declare passwindow&,e%,i%
Windowtitle RHP Windows
Window 50,20 - 900,700
LoadBMP RHPVISTA.BMP,54,69;0
LoadBMP Leiste.BMP,54,586;0
LOADBMP START.BMP,54,586;0

whilenot e%

    WaitInput

    if Mouse(54,586-54+99,586+30)

        if i% = 1  Ist das Startmenu offen

            LoadBMP RHPVISTA.BMP,54,69;0
            LoadBMP Leiste.BMP,54,586;0
            LOADBMP START.BMP,54,586;0
            repaint neu malen
            i% = 0 Starmenu zu

        elseif i% = 0  es ist zu!

            LoadBMP STARTPUSHED.BMP,54,91;0
            repaint neu malen
            i% = 1  Startmenu offen

        endif

    endif

endwhile

 
20.02.2009  
 




Roberto
Und jetzt noch bitte die Zahlen Erklären
 
Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^
20.02.2009  
 




Paul
Glatz
Ich habe alles im Code mit komentaren erklärt
 
20.02.2009  
 




Roberto
Ja aber net die Koordinaten
if Mouse(54,586-54+99,586+30)
 
Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^
20.02.2009  
 




Paul
Glatz
Das sind die koordinatenb des Startbuttons

Besser ist:
KompilierenMarkierenSeparieren
if Mouse(54,586-153,616)re>
 
20.02.2009  
 




Roberto
Ja aber was bedeuten die Einzelne Zahlen Zb Welche ist die Zahl per x und y
 
Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^
20.02.2009  
 




Paul
Glatz
Aiuto zu XProfan 11

@Mouse(X1,Y1 - X2,Y2)

X1,Y1 : Integer - linke obere Ecke
X2,Y2 : Integer - rechte untere Ecke

Ergebnis: Integer (0 oder 1)
Das Ergebnis ist 1, wenn beim letzten Mausklick die Maus im angegebenen Bereich war.
 
20.02.2009  
 




Roberto
Ne ich mein das
if Mouse(54,586-153,616)
Für was steht 54 x oder y
und was bedeutet 586-153 x oder y
und 616?
 
Ich bin neu hier also Verurteilt mich nicht für meine fragen.^^
20.02.2009  
 




Paul
Glatz
Also

54 = X oben links (X1)
586 = Y oben links (Y1)
153 = X unten rechts (X2)
616 = Y unten Rechts (Y2)
 
20.02.2009  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

25.606 Views

Untitledvor 0 min.
H.Brill20.09.2023
Langer01.01.2022
Ernst30.04.2014

Themeninformationen



Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie