| |
| |
|
Frank
Abbing | Hi,
for my new Tool Profan for rotten need I yet The Thread-speed? possible vieler Program-Editoren. Please posting whom names here!
around the names to find out, can your whom downstairs code started. it appear one Window with the Thread-speed? the program, the itself under the Cursor befindet. Please launch euren editor and rad with the mouse above. so can your whom names slight read.
CompileMarkSeparationDeclare bereich#,be#,erg&,erg2&,x&,y&,text$
Dim be#,8
Dim bereich#,1024
DEF GetCursorPos(1) !USER32,GetCursorPos
DEF WindowFromPoint(2) !USER32,WindowFromPoint
DEF ChildWindowFromPoint(3) !USER32,ChildWindowFromPoint
Def GetSysColor(1) !USER32,GetSysColor
Def ScreenToClient(2) !USER32,ScreenToClient
Def GetClassName(3) !USER32,GetClassNameA
Def GetWindowText(3) !USER32,GetWindowTextA
DEF NewWindowPos(7) !USER32,SetWindowPos
WindowTitle Windowclasses...
WindowStyle 543
Window (%maxx/2-160),(%maxy/2-40)-320,80
Cls GetSysColor(15)
NewWindowPos(%hwnd,-1,0,0,0,0,$13)
Usefont MS Sans Serif,13,0,0,0,0
SetDialogFont 1
SetTimer 10
While 1
WaitInput
Case @equ(%key,2):Break
GetCursorPos(be#)
x&=Long(be#,0)
y&=Long(be#,4)
erg&=@WindowFromPoint(x&,y&)
If erg&<>0
ScreenToClient(erg&,be#)
x&=Long(be#,0)
y&=Long(be#,4)
erg2&=@ChildWindowFromPoint(erg&,x&,y&)
EndIf
TextColor 0,GetSysColor(15)
GetClassname(erg&,bereich#,128)
text$=String$(bereich#,0)
DrawText 8,16,Klassenname = +text$+
EndWhile
KillTimer
Dispose be#
Dispose bereich#
end
I hope on a rege holding! 
P.s.: Zusatzfrage: is The Tastenkombination STRG+F12 in eurem Programmeditor occupied? |
|
| |
| |
| |
|
|
Dietmar
Horn | | Klassenname = TTHEditor for PrFellow-editor. |
|
| |
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...]  Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 10/18/06 ▲ |
|
| |
|
|
| Klassenname = TmwCustomEdit for Profan-Pad 3.4 R4
Strg + F12 not occupied |
|
| |
| |
| |
|
|
Sebastian
König | Scintilla for XProfEd, Notepad++ and many others have You sure already in the list  . if too Editoren for others Languages relevant are: Afx:400000:8 in Visual studio 98... |
|
| |
| Windows XP, XProfan/Profan² 4.5 bis 11 Profan2Cpp-Homepage: [...] Alte Profan²-Seite: [...] | 10/18/06 ▲ |
|
| |
|
|
Jörg
Sellmeyer | by me says Prfellow TPRFelForm for Main window and even TTHEditor for a Editorcontrol.
no Strg + F12.
Spaßeshalber yet Notepad: the says by me ... Notepad |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 10/18/06 ▲ |
|
| |
|
|
Michael
Wodrich | unvollständig (discretionary erweiterbar):
Afx:400000:8 (Visual studio 98) (well too .NET)
ClientWndProc (Amaya)
ECEditControlClass (EasyCode)
Edit (any einfachen Eingabefelder)
Edit (NotePad, XP) (<- with AU3Info controlled!!!)
HSEditor (TextPad)
internet Explorer_Server (Editfields the Community)
internet Explorer_Server (JokeBox the Community)
MozillaWindowClass (NVU)
RichEdit20A (BEditor)
RichEdit50W (WordPad, XP)
SALFRAME (OpenOffice 2)
Scintilla (XProfEd)
ScintillaPB (XPrfEdit)
TEditControl (Turbo Delphi)
ThunderATX4h (PostMe)
TmwCustomEdit (ProfanPAD)
TRichEdits (URLPad)
TSynEdit (ConText)
TTHEditor (PrFellow-editor)
Window (Lazarus)
WindowForms10.EDIT.app.0.33c0d9d (XML Notepad 2006) (.NET !!!)
Ctrl-F12 is by me only ex and on occupied (can also another combination take on)
Best wishes
Michael Wodrich
P.s.:
DotNET has well light difficulty with reasonable Thread-speed?. the could in future one correctly. large trouble go. |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 10/18/06 ▲ |
|
| |
|
|
Torsten
Rümker | TConTEXTSysEdit
[EDIT] they say naturally TConTEXTSynEdit [/EDIT] |
|
| |
| Ich lerne, ob ich will oder nicht!
Betriebssystem:
- Ubuntu 15.x
- Windows (diverse)
XProfan Version: X2 | 10/19/06 ▲ |
|
| |
|
|
Michael
Wodrich | there missing somewhere one Separator...
ConText??? |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 10/19/06 ▲ |
|
| |
|
|
Michael
Dell | no Separator but TConTEXTSynEdit
PsPad: TPSSynEdit
Metapad: RichEdit20A |
|
| |
| Salu Michael...
Hab zwar krumme Fieß awer dofir e' ecklich Gsicht! | 10/19/06 ▲ |
|
| |
|
|
Frank
Abbing | thanks for eure umfangreichen Tests!!!
i'll well the meisste of it install  |
|
| |
| |
| |
|
|
Frank
Abbing | | any names, The me sure showed up, have I installed. the any Thread-speed?, which The Strings EDIT, SCINTILLA or TEXT imply. |
|
| |
| |
| |
|
(507)
Deutsch
English
Français
Español
Italia