XProfan

clockbar_mini.zip

291 kB

Version:

1.8a

Hochgeladen:

27.01.2014

clockbar2.zip

372 kB

Version:

2.0

Hochgeladen:

09.10.2014

clockbar3.zip

1.885 kB

Version:

3.3.0.0 - build 25.06.2019

Hochgeladen:

24.06.2018

TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

29.03.2013 ▲

- page 2 -

Georg
Teles

Hm hmmmmmm, alors avec skalierung suis je trop b*** unerfahren mon je, glaube je, habe pas la fois une Ansatz xDD mais qui Ecken abrunden cela wusste je déjà

...

je devrait oui qui masque sur un la fenêtre vergrößert malen, comment soll je ensuite herausfinden comment grand cela voilà um es abzuspeichern ? et überhuapt wird cela oui stören si on justement "Live" beim agrandir qui Clock ist et pour chaque Pixel, cela on plus zieht muss on oui avec qui souris récente ansetzten weil qui oui loslassen serait, si je chaque la fois neuzechnen veux, plan avec dem la fenêtre malen, agrandir etc (et irgendwo wird un la fenêtre blinken wohin je cela draufzeichne xD) c'est mir glaube trop hoch, là muss je déjà XProfan viel plus étudier ... je lass cela la fois sans skalierung ok je hoffe il y a aucun Haue

cela avec WorkArea gibts aussi un Problem, j'ai oui bereits qui Usermessages $201,$205 et si je 513 dazunehme allez cela pas, gibt es de qui Message 513 une angabe avec $ zufüllig ?
(avec $513 hab je déjà probiert, négative

)

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

14.04.2013 ▲

qui numéro 513 la base 10 wäre 201 la base 16. là qui Message $201 déjà dans qui liste eingetragen ist, wird qui faute wahrscheinlich woanders liegen.

quoi ist avec cela?

Julian Schmidt (03.04.13)

Julian
Schmidt

Georg T. (14.04.13)

je devrait oui qui masque sur un la fenêtre vergrößert malen, comment soll je ensuite herausfinden comment grand cela voilà um es abzuspeichern ? et überhuapt wird cela oui stören si on justement "Live" beim agrandir qui Clock ist et pour chaque Pixel, cela on plus zieht muss on oui avec qui souris récente ansetzten weil qui oui loslassen serait, si je chaque la fois neuzechnen veux, plan avec dem la fenêtre malen, agrandir etc (et irgendwo wird un la fenêtre blinken wohin je cela draufzeichne xD) c'est mir glaube trop hoch, là muss je déjà XProfan viel plus étudier ... je lass cela la fois sans skalierung ok je hoffe il y a aucun Haue

tu peux aussi simple ne Choicebox ou bien une Trackbar choisir wohin un Vergrößerungsfaktor ausgewählt volonté peux et beim Change-Ereignis seulement Neuzeichnen.

Georg T. (14.04.13)

cela avec WorkArea gibts aussi un Problem, j'ai oui bereits qui Usermessages $201,$205 et si je 513 dazunehme allez cela pas, gibt es de qui Message 513 une angabe avec $ zufüllig ?
(avec $513 hab je déjà probiert, négative

)

cela vorgestellte $ avant den Usermessages bedeutet cela es sich um une numéro aus dem 16-Systen ergo Hexadezimalsystem handelt. Im Prinzip ist es égal si qui Messagenummer comme Hexadezimalzahl ou bien Dezimalzahl angegeben wird.
Siehe aussi.
Kompilieren Marque Séparation

cls
print hex$(513)
print $201
waitinput<

pre>

Wäre pratique si on cela Tool per Tastendruck solange qui bouton gedrückt ist ausblenden peux um dans Ruhe den Fenstertitel lesen trop peut.

Salut

XProfan X2
Win7 Professional, SP1, AMD FX(tm)-8350 Eight-Core Processor
˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

14.04.2013 ▲

Georg
Teles

eh on suis je unterbelichtet

alles bien sûr, merci Julian, cela funktioniert maintenant...
ok, ensuite exposition je la fois, comment je qui Skalierung realisieren peux... hmm, ensuite peux je oui simple quelle bricoler zB.

0,1x 0,2x 0,3x 0,4x 0,5x 0,6x ... 1x 2x 5x 10x Fache Vergrößerung, et wenns fastidieux volonté sollte alles dans 0,1 Schritten xD ... mais cela wär qui Solution, espace cet Masken vorfertigen et mitliefern, ne...aucune Problem, les numéros simple avec DrawSizedPic agrandir / verkleinern...

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

14.04.2013 ▲

Georg
Teles

OK es funktioniert avec qui Vergrößerung dans 0.1il Schritten.
chez manchen Faktoren voyons qui Les chiffres pas besonders bien aus weil DrawSizedPic, égal, pour werde je maintenant pas pour je facteur chacun Ziffer avec msPaint Travailler cela serait dauern avec cela es parfait aussieht geschweige espace qui Bitmaps einzeln dans ResHacker per main dans qui Runtime trop saisir, cela wären ensuite seul chez facteur 0.1 de 0.5 jusqu'à 2.5 ensuite 10*22 Bitmaps = 220 Bitmaps xD

Allerdings muss je erstmal weiterfummeln, avec cela es wenigstens avec DrawSizedPic réglé allez ...

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

Julian
Schmidt

Klingt bien. seulement peux es son cela du encore pas qui neue Version hochgeladen la hâte? Find zumindest pas qui Einstellungsmöglichkeit.

Georg
Teles

OK justement qui neuste qui j'ai hochgeladen, voilà un paire Sachen verbessert worden, si on de HHMM trop HHMMSS switcht, ensuite wird cela la fenêtre zentriert gesetzt ... encore quoi, merci Julian pour qui Funktion WorkArea, c'est maintenant drin, hoffe sous Win8 allez cela, ah du schreck, hab oui selber sous Win7 pas getestet

EDIT: Win7 allez einwandfrei, ensuite wird es sous 8 aussi marcher, hoffe je doch.
trop Testzwecken hab je encore nix wohin on es anschauen peux, avec qui Vergrößerung, hab mon COdes erstmal allgemein angepasst, dass on qui Vergrößerung berücksichtigt sry Julian ^ ^

ici qui 0.5-Fache vergrößerung (od. Verkleinerung, je pour dem)

05.jpg	4 kB

Hochgeladen:	01.05.2013

Downloadcounter:
		Herunterladen

TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

Julian
Schmidt

ne...aucune Problem.
Mir fällt chez qui Version sur, dass qui Choiceboxen ab et trop de entier alleine wieder zuklappen. simple un paire la fois essayer. Hoffe tu peux cela reproduzieren.
Aussi:

Julian Schmidt (03.04.13)

Wäre pratique si on cela Tool per Tastendruck solange qui bouton gedrückt ist ausblenden peux um dans Ruhe den Fenstertitel lesen trop peut.

Georg
Teles

Aaah oui, habe justement gemerkt dass es chez alles Versionen so ist, je versuch oui qui Auswahlen dans "Echtzeit" trop montrer, là muss je la fois quoi kurz paraphraser.

Wäre pratique si on cela Tool per Tastendruck solange qui bouton gedrückt ist ausblenden peux um dans Ruhe den Fenstertitel lesen trop peut.

ah sry cela habe je überlesen, je cherche justement pour einer Possibilité, avec
Kompilieren Marque Séparation

Def @GetAsyncKeyState(1) !"User32","GetAsyncKeyState"

If GetAsyncKeyState(<TastenCode>)<>0

/pre>

gehts zwar mais je veux beim Tastendruck, si on gedrückt peut, qui Clock ausblenden et beim loslassen wieder Montrer laisser ... je cherche la fois pour einer Possibilité

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

02.05.2013 ▲

Georg
Teles

Vergrößerung funktioniert, c'est mais une fummellige travail, suis chez weitem pas fertig avec cela ...

-> Clock ausblenden beim Tastendruck: habe encore aucun Solution trouvé
-> Bugs avec ChoiceBox, aufklappen / einklappen, weiss pas woran es liegt, tritt chez XP et 7 sur jeden le cas sur
ici la fois un Testcode:
Kompilieren Marque Séparation

If Clicked(m_d&)'ChoiceBox wird angeklickt

    Ifnot Upper$(GetText$(m_d&)) = Upper$(mod$)'wenn Eintrag der ChoiceBox NICHT gleich des Wertes vorher

        mod$ = GetText$(m_d&)
        'mask(stl$,mod$,1) 'Maske wird erstellt
        'init_z() 'Zahlenbilder neu eingelesen
        'SetTransparent %HWnd,tra$ 'Transparenz
        'wdi_() 'Fenster positioniert
        'draw() 'Neugezeichnung, samt Zahlen
        SetFocus(m_d&)'Fokus wieder auf die ChoiceBox <--- hier ist vielleicht das Problem ???

    EndIf

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

20.05.2013 ▲

Julian
Schmidt

trop qui Choicebox-Geschichte. simple cela Clickereignis rauslassen. ensuite schließt es sich aussi pas wieder si du den Fokus neusetzt.
Kompilieren Marque Séparation

CLS
Var m_d&=Create("ChoiceBox", %hwnd, 0, 10, 10, 100, 100)

whileloop 10

    AddString(m_d&,Str$(&loop))

EndWhile

Var mod$=GetText$(m_d&)

WhileNot iskey(27)

    Waitinput 500

    Ifnot GetText$(m_d&) = mod$

        waitinput
        print "Kommandos ausführen"
        mod$ = GetText$(m_d&)

    EndIf

Endwhile

Tastendruck vlt avec
Kompilieren Marque Séparation

cls
external("user32.dll","RegisterHotKey",%hWnd,222,1,32)
usermessages 786'wm_hotkey

tandis que 1

    Waitinput 500

    si %uMessage=786

        ShowWindow(%hwnd,0)

    D'autre

        ShowWindow(%hwnd,1)

    endif

Endwhile

sais du déjà quoi du pour une Tastenkombination verwendest? j'ai dessus vieux+Leertaste verwendet.

20.05.2013 ▲

Georg
Teles

Verzeihung, hatte aucun Zeit pour qui Clockbar mais nu hab je qui faute avec den Choice-Boxen behoben (hoffentlich

)
@Julian: folgende Wünsche konnte je encore pas rencontrer:

> Vergrößerung / Verkleinerung (allez, brauche Zeit pour

)
> bouton zum Ausblenden (comment weiss je déjà)

daher ist cet Version Beta, alors Update ist dessus

XProfan 10
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

26.07.2013 ▲