XProfan

Español

funkheld

¡Hola, dieser Source-Code hier de el Foro se ejecuta no yo en el einwandfrei con Win7. Lo se dauernd Texto en el Editor geschrieben.

Woran liegt el Fehler?

Gracias.

Gruss

Kompilieren Marca Separación

'Source wurde al 15.07.2007 de el MMJ-Quellcodesammlung (Dietmar Horn) en el Babyklappe en XProfan.Com abgelegt:
'Programa fernsteuern (Ejemplo: Notepad)
'Der angegebene Pfad para Guardar es ggf. anzupassen
Declarar Notepad&, NotepadWin&
' Notepad starten
Let Notepad& = WinExec("NOTEPAD.EXE",1)' Notepad starten
Let NotepadWin& = GetActiveWindow()' Handle des Notepad-Hauptfensters
' Texto senden
SendString(0,"Hallo Welt!\n")
SendString(0,"Dieser Texto kommt vom PROFAN-Programa!{ENTER}")
SendString(0,"{- 20}{ENTER}")
SendString(0,"+(fertig)!")
' Menübefele senden
SendKey(NotepadWin&,18)' Alt
SendKey(NotepadWin&,68)' D (Expediente)
SendKey(NotepadWin&,85)' U (speichern Bajo)
' Guardar-Diálogo ausfüllen
SendString(0,"D:\\TEST.TXT")
SendString(0,"{ENTER}")'... y OK
SendKey(NotepadWin&,18)' Alt
SendKey(NotepadWin&,68)' D (Expediente)
SendKey(NotepadWin&,66)' B (Beenden)
End

16.04.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

E.T.

Hm, eben durchgecheckt: Meinst du con

Lo se dauernd Texto en el Editor geschrieben.

el Texto se en el Profano-Editor geschrieben ???
Habs eben veces durchgespielt, el Edición se wirklich en el Profano-Editor (en mi caso es el PrFellow) geschrieben.

Tiempo genauer anschauen, algo se ejecuta como con el Ventana-Handle torcido, porque en el Notepad-Ventana (welches sí como es) se nix geschrieben.

Fehler tritt aber auch ya bajo XP en

XProfan X2
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

17.04.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

RGH

Als el Beispielcode antes encima 10 Jahren geschrieben wurde, waren el Rechner todavía langsamer!
Lo muss sichergestellt ser, dass el Notepad auch comenzó y el aktive Ventana es, bevor el Línea con GetActiveWindow() ausgeführt se. Auch SendString con 0 como Handle nutzt el gerade aktive Ventana.
Gleiches gilt más unten, si la neue Dateibname en el Dateidialog geschrieben se.

Gerade en solch alten Beispielen es hilfreich, a verstehen, qué como passiert, en ellos a aktuelle gegebenheiten adaptar a puede.

Saludo
Roland

XProfan X2
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

17.04.2012 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita