XProfan

Français

Edwin
Camdzic

Hi,

mich hat cela Vue Design so fasciné, dass je es dans mon XP-Programme einbauen veux. mais es hängt là scho entier am Anfang. car den Aero effet habe je déjà hinbekommen, il peut pour mais cela la fenêtre pas Déplacer (blöd). maintenant bräuchte je s'il te plaît une, qui mir sagt comment je un la fenêtre sans Titelzeile et sans Menüleiste Déplacer peux. suis pour chacun Aider reconnaissant.

merci im Vorraus!

Um Aero hinzubekommen, benutzt cela la fenêtre den Desktop comme Hintergrund. si on cela la fenêtre maintenant Déplacer serait, so serait doch qui Hintergrund le vieux son et sich pas aktualisieren? peux on dagegen aussi quelque chose faire?

bye

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

- page 2 -

Edwin
Camdzic

Hi,

Ok, habe verstanden et werde mich daran tenir!

Sry, nacher ist einem toujours alles bien sûr. (respect gutes Bsp.)

%% krieg aucun gute Box comment son hin %%
Kompilieren Marque Séparation

Windowstyle 112
window 200,200 - 583,397
loadbmp C:\_ground.bmp ,0,0;-1
Def ReleaseCapture(0) !USER32,ReleaseCapture
Declare ende%
Print         Fenster mit Linksklick bewegen - Rechtsklick beendet

Whilenot ende%

    Waitinput

    If Equ(%message,$201) 	 WM_LButtonDown

        UseCursor 5
        SendMessage(%hwnd,$112,$F012,0)
         $112: WM_SYSCOMMAND
         $F012: Undokumentierter Wert: ist besser als $0F010 (SC_MOVE)
        ReleaseCapture()	 funktioniert auch ohne, ist aber besser so
        UseCursor 0

    ElseIf Equ(%message,$204)  WM_RButtonDown

        Let ende%=1

    EndIf

Wend

Fin

Bild beinhaltet Weißanteile qui ausgeblendet volonté, et so qui Desktop durchscheint

XP Home SP2, Profan 9.1

?? ausreichend ??

bye

_ground.bmp	680 kB

Kurzbeschreibung:	Bild, dass geladen wird!

Hochgeladen:	06.04.2007

Downloadcounter:
		Download

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

mach simple statt

besser [CODE] pour quelltexte - habs la fois geändert chez dir...

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Edwin
Camdzic

Ok, merci!

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

cela Bild de dem Du redest (quoi malheureusement pas mitgeliefert ist) mag oui Weißanteile besitzen - mais cet pour dem Déplacer trop Aktualisieren wird Dir pas gelingen là Windows selbst aucun Info par-dessus besitzt quoi réellement derrière dem la fenêtre liegt. Einzige Mgl. wäre cela Ausschneiden de Fensterteilen mittels Regions. Hierbei ist mais seulement une Transparenz possible - aucun Transluzens. sous WinXP könntest Du ensuite cet ausgeschnittenen Regions cependant wiederum couvrir - avec transluzierenden Statics. Dabei peux Du ensuite mais pas plus qui Verschiebung avec qui Capture de sortie-Api nutzen - Du müsstest ensuite mon obige variante pour cela Déplacer nutzen là Du qui Statics manuel beim Déplacer nachpositionieren müsstest. (qui variante de qui Frank meint on könne vous pas ausbauen ;) )

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Edwin
Camdzic

maintenant avec Bild!

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

exposition la fois abgerundete Ecken:
Kompilieren Marque Séparation

def ReleaseCapture(0) !USER32,ReleaseCapture
def RoundRectRgn(6) !GDI32,CreateRoundRectRgn
def SetWindowRgn(3) !USER32,SetWindowRgn
Declare ende%
Windowstyle 112
window 200,200 - 583,397
loadbmp _ground.bmp ,0,0;0
SetWindowRgn(%hwnd, RoundRectRgn(0,0,width(%hwnd),height(%hwnd),18,18), 1)

Whilenot ende%

    Waitinput

    If Equ(%message,$201) WM_LButtonDown

        UseCursor 5
        SendMessage(%hwnd,$112,$F012,0)
         $112: WM_SYSCOMMAND
         $F012: Undokumentierter Wert: ist besser als $0F010 (SC_MOVE)
        ReleaseCapture() funktioniert auch ohne, ist aber besser so
        UseCursor 0

    ElseIf Equ(%message,$204) WM_RButtonDown

        Let ende%=1

    EndIf

Wend

Fin

06.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Alfred
Wagner

allô Edwin
Hab un peu avec IF;s Code gespielt

si du encore une Checkbox brauchst
Kompilieren Marque Séparation

def ReleaseCapture(0) !USER32,ReleaseCapture
def RoundRectRgn(6) !GDI32,CreateRoundRectRgn
def SetWindowRgn(3) !USER32,SetWindowRgn
Declare ende%,Fenstert$,Ende&,CB&,Txt$,hFont%,Text$
Windowstyle 112
window 200,200 - 583,397
loadbmp _ground.bmp ,0,0;0  ** Pfad anpassen
SetWindowRgn(%hwnd, RoundRectRgn(0,0,width(%hwnd),height(%hwnd),18,18), 1)

Proc Controls

    Fenstert$ = Hier kommt der Fenstertietel hin
    TextColor RGB($FF, $00, $00),-1  ** Blauer Text
    USEFONT Arial,22,0,1,1,0** Schriftart
    Drawtext 140,15,Fenstert$
    hFont% = @Create(Font,MS Sans Serif,13,0,0,0,0)** Schriftart
    Ende&=CREATE(BUTTON,%HWND,Ende,450,350,90,22)
    SetFont Ende&,hFont%** Schriftart für Button
    Text$ = Ich bin der Checkbox Text
    CB&= CREATE(Checkbox,%HWND,,30,100,12,12)
    TextColor RGB($00,$00,$FF),-1  ** Blauer Text
    USEFONT MS Sans Serif,13,0,0,0,0** Schriftart
    Drawtext 50,100,Text$

Endproc

Controls
** Hauptschleife
SETFOCUS(%HWND)

WHILENOT ENDE%

    WAITINPUT

    If %KEY=2

        ENDE%= 1

    ELSEIF %KEY=4

    ElseIf Equ(%message,$201) WM_LButtonDown

        UseCursor 5
        SendMessage(%hwnd,$112,$F012,0)
         $112: WM_SYSCOMMAND
         $F012: Undokumentierter Wert: ist besser als $0F010 (SC_MOVE)
        ReleaseCapture() funktioniert auch ohne, ist aber besser so
        UseCursor 0

    ElseIf Equ(%message,$204) WM_RButtonDown

        Let ende%=1

    ELSEIF GETFOCUS(Ende&) BUTTON

        ENDE%=1

    EndIf

Wend

href='./../../references-fonction/XProfan/end/'>Fin

Grüße

Alfred avec la famille

WinXP-Home ,XProfan10

Alfreds ... Freeware : [...]

07.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Frank
Abbing

allô Edwin
Hab un peu avec IF;s Code gespielt

était qui abgewandelte Code de Thomas H. Seinen eigenen (ersten) Code entwickelt nichtmal iF plus...

Um cela nochmal klarzustellen - seulement weil iF ständig (per Skype) puis herumreitet: Entgegen meinem Posting funktioniert es oui aussi bien sans Subclassing. Thomas hat plan une autre (très) intelligente Solution trouvé.
iFs ersten Code finde je mais pour comment avant primitiv et pas sonderlich ausbaufähig. Gibt seulement Probleme, si il plus entwickelt serait.

07.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Edwin
Camdzic

Hi,

merci pour qui vielen guten Propositions et merci pour qui Aider!

Es scheint alors pas possible trop son cela avec dem Hintergrund so hinzubekommen, comment je mir cela vorgestellt habe. tant pis!

Nocheinmal merci.

PS: ist es possible qui derzeitige Position eines Fensters trop ermitteln, ensuite cet trop Sauver, cela la fenêtre trop finissons et un nouveau la fenêtre sur qui alten Position récente aufzubauen?

Bsp.:
Kompilieren Marque Séparation

windowstyle 80
window 100,100 - 100,100
dann wird das Fenster verschoben auf
windowstyle 80
window %WinLeft,%Wintop - 100,100
und jetzt das Fenster löschen und auf der Position
windowstyle 112
window %WinLeft,%Wintop - 100,100
neu aufb

bye,

lg edwin

xp home, profan 9.1

07.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

oldmike

exposition la fois dans qui Profan-Aider (je hab qui XProfan10-Aider de Xprofan.de geladen) dans qui Indexsuche sous la fenêtre zentriert.....

cela sollte Dir weiterhelfen

cu
oldmike

cela Suchwort Fenstergröße ist encore besser...

--
Das Leben ist ein Scheiß-Spiel, aber die Grafik ist geil.

07.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Edwin
Camdzic

Hi,

pour langem Überlegen, J'ai eu une concept.

Wäre es car pas possible, dass lokale Hintergrundbild, simple trop kopieren. alors cela Bild, wohin sich justement cela la fenêtre est?
on devrait cela la fenêtre wegbewegen et sich qui vorherige Position des Fensters merken.ensuite cela Bild dans den grenier kopieren, cela la fenêtre à den place bewegen, cela Bild aus dem grenier insérer et cela Bild des la fenêtre (_ground.bmp) darüberleben.

je crois, dass qui concept gar pas so mal wäre, mais zur Umsetzung fehlt mir selbst qui nötige Erfahrung.

bye

xp home, profan 9.1

07.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Michael
Wodrich

...et quoi passiert ensuite si sich un d'autre la fenêtre derrière Deinem la fenêtre est?
si Du alle cet Fehlerquellen eliminieren vouloir ensuite fonctionne cela sur une eigene Fensterverwaltung hinaus. là es Du avec Subclassing ensuite doch besser bedient.

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

07.04.2007 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

◄

123

►