| |
| |
|
GDL | Hi,
j'ai nen Adressenproblem avec den Objekthandles,là je festzugewiesene Werte brauche.dans etwa so:
handle1&=create(button,%hwnd,..................................)
handle1&=1000
ou bien
handle1&=1000
1000=create(button................................)
il me faut ca desshalb,là qui Objekte de aussen(hardwaremässig) et interne(souris) gesteuert volonté doit et qui Concentrer qui Objekte gleichzeitig qui Adressennummer pour une Hardwaresteuerung sommes.
Kurz dit: qui Handlenummer muss fest zugeordnet volonté et chez jeden Programmstart toujours juste son.
ca était sous DOS Zeiten relativ simple, là on sich dans qui config.sys EMS grenier beim Starten des PC reservieren konnte et Powerbasic(DOS Vers.) puis zugreifen konnte.peut-être allez ca avec Windows et XProfan oui aussi?
salut
Georg |
|
| |
| |
| |
|
|
Thorsten
Friedrichs | allô.
alors malheureusement habe je encore pas entier verstanden quoi du faire veux. quoi veux du car womit steuern? Soll deine Hardware im Programme quoi steuern ou bien soll cela Programme quoi steuern?
Meines wissens pour allez cela pas avec festen Handles. DOS kannte cet Art Handleverwaltung soweit je sais gar pas et si doch,ensuite était cela déjà vous comment maintenant chez Windows. qui Vergabe qui Handles übernimmt Windows dynamisch, là peux on aussi rien drann changement. cela allez simple pas. mais là du cela Handle erhälst, peux du cet naturellement à l'autre Programme transfert.
peut-être avons wir oui ne concept comment du cela quoi tu veux gestallten peux, mais momentan sais je allerdings encore pas quoi du faire veux.
Salut
Toshy |
|
| |
| ------------------------------------------------------------------------------------------
XProfan 9/Win98&undWinXP/PRFellow/ TCP.DLL
Profaner seit 4.5 /einige Jahre (mit Programmierpausen) | 22.02.2006 ▲ |
|
| |
|
|
 | | Du wirst qui tatsächlichen Handles den Wunschhandels arrêt nachträglich zuordnen doit... |
|
| |
| |
| |
|
|
GDL | Salut,
@Toshi
Richtig, sous DOS donnais es aucun Handles.là cela Programme mais toujours im selben Speicherbereich lief hatte on toujours dieselben Speicheradressen zum Abfragen.
Gebraucht wird cela ganze zur parallelen Tastenabfrage (Weichenpult et Bildschirm), wobei chacun bouton une anderen Datensatz aus einer Dossier invite.là qui Hardwaretasten une feste Adresse sur une Matrix liefern wäre es arrêt joli gewesen den Bildschirmcontrols selbigen Wert trop donner et cette avec getfocus einfachst abzufragen.
@Si
j'ai es presque déjà befürchtet dass es seulement so allez.Habe aussi déjà so angefangen seulement chez 2400 möglichen Tasten gehoft ne autre Possibilité pour trouver.
eh bien ensuite weisen wir beim Programmaufruf chaque Bildschirmcontrol nen Arraywert trop.
salut
Georg |
|
| |
| |
| |
|
|
| Mach doch un Trick!
prends Gettext - et bestücke qui Textes qui Controls... |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
encore besser ist mais, du speicherst la valeur sous GWL_USERDATA mittels SetWindowLong(). Lecture allez ensuite très simple avec GetWindowLong(). |
|
| |
| |
| |
|
|
GDL | allô Frank,
la fois abgesehen de den Handles, mais là sprichst du une entier grosse Schwachstelle de mir à.
sur qui péril hin ausgelacht trop volonté mais je checke ca avec den Setwindowlong et co pas du tout.j'ai la fois versucht den Code Snippet Animierte la fenêtre trop comprendre.Fehlanzeige je kapier qui Funktionsabläufe qui individuel Befehle simple net.
salut
Georg |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
pourquoi sollte toi quelqu'un auslachen?
ici la fois un Anwendungsbeispiel:
KompilierenMarqueSéparationDeclare button&,sthand&
Def GetWindowLong(2) !"USER32","GetWindowLongA"
Def SetWindowLong(3) !"USER32","SetWindowLongA"
Cls
button&=Create("Button",%hwnd,"Test",32,32,80,24)
SetWindowLong(button&,-21,1000)
sthand&=GetWindowLong(button&,-21)
Print "Statischer Handle = "+Str$(sthand&)
WaitInput
| 23.02.2006 ▲ | |
|
| |
|
|
GDL | allô Frank,
es funzt.dans etwa so wird es incorporé.
KompilierenMarqueSéparationDeclare Button&[2450],Sthand&,ende%,adresse&,nummer%,y%,num%
Def Getwindowlong(2) !"USER32","GetWindowLongA"
Def Setwindowlong(3) !"USER32","SetWindowLongA"
window 0,0 -1024,748
y%=10
clear nummer%
whilenot y% > 600
Button&[nummer%]=Create("Button",%Hwnd,"Test "+str$(nummer%),32,y%,150,24)
Setwindowlong(Button&[nummer%],-21,(1000+nummer%))
y%=y%+30
inc nummer%
wend
whilenot ende%
clear num%
Waitinput
whilenot num% > nummer%
if getfocus(button&[num%])
adresse&=Getwindowlong(Button&[num%],-21)
drawtext 400,300,"aktuelle Adresse = "+str$(adresse&)+" "
endif
inc num%
wend
Wend
KompilierenMarqueSéparation!
Déclarer Button&[2450],Sthand&,ende%,adresse&,numéro%,y%,num%
Def Getwindowlong(2) !"User32","GetWindowLongA"
Def Setwindowlong(3) !"User32","SetWindowLongA"
window 0,0 -1024,748
y%=10
clear numéro%
whilenot y% > 600
Button&[numéro%]=Créer("Button",%Hwnd,"Test "+str$(numéro%),32,y%,150,24)
Setwindowlong(Button&[numéro%],-21,(1000+numéro%))
y%=Y%+30
inc numéro%
Wend
whilenot ende%
clear num%
Waitinput
whilenot num% > numéro%
si getfocus(button&[num%])
adresse&=Getwindowlong(Button&[num%],-21)
drawtext 400,300,"aktuelle Adresse = "+str$(adresse&)+" "
endif
inc num%
Wend
Wend
suis wieder une Schritt plus.la fois guggen comment je es plus löse.
salut
Georg |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
na siehste.
et aucun Angst avant API. si du qui technologie erstmal verstanden la hâte, ist qui Umgang avec cela entier léger  |
|
| |
| |
| |
|
(1.543)
Deutsch
English
Français
Español
Italia