| |
| |
|
| - Page 1 - |
|
GDL | Hi Profaner
wieder kleine Sache,mit großer Auswikung
Nutze dieses Programm zur Mikrocontrolerprogramierung.Da der erzeugte Quelltext Atmel Assembler ist,ist es notwendig,das alle Zeilen aus meiner Anwendung korrekt übernommen werden.Eine Fehlersuche in ASM Code ohne debugger nervt jedesmal.
Nun zum Problem:
Da ich die Zeilen beim Laden einer File einzeln auswerten muss,habe ich folgendes zusammengebastelt:
WhileNot @Eof(#1)
Input #1,wert$
InsertString editor&,wert$
sleep 20 sonst wird Return verschluckt
@SendKey(editor&,13) Return senden
Sprungmarken ermitteln
Ein Einbauen einer Schleife ,sowie ein Erhöhen des sleepwertes hilft nichts,es werden immer einige Return verschluckt.
ohne sleep werden alle Zeilen aneinandergefügt.
Die letzte Möglichkeit wäre die File als .txt komplett einzulesen und dann
die Zeilen auszuwerten.Möchte mir aber wenns possibile ist eine komplette Neuprogr.dieses Programmteiles ersparen.
Auch if sein Vorschlag mit settimer waitinput killtimer geht nicht.
Meine Modelleisenbahn macht mich noch zum Windowsprogramierer.Hätt ich auch nie gedacht.
Mit freundlichen Grüßen
Georg |
|
| |
| |
| |
|
|
| |
| |
| - Page 1 - |
|
GDL | Hi Andreas,
Danke.Wie durch Geisterhand wird die Win.ini in Wordpad geladen.
Geht gleich in meine API Anwendugssammlung.Riesig net,dass Du mir gleich die Tastenbelegung mitgeliefert hast.
Georg |
|
| |
| |
| |
|
| |
| |
| - Page 2 - |
|
|
 | Hallo Georg...
So ganz nebenbei lassen sich auch mit dem fünften Parameter der Funktion bei Bedarf Daten zwischen zwei Anwendungen austauschen (z.B.Handles). Diese Daten können vom Empfänger mit der API GetMessageExtraInfo recht einfach ausgelesen werden... |
|
| |
| |
| |
|
|
GDL | Hi Andreas,
ist der fünfte Parameter unkritisch,oder sollte man lieber die Finger davon lassen und nicht rumprobieren.
Nehme an,dass die Daten in einer Bereichsvariablen stehen müssen(bei string variablen oder Text).
Habe momentan Elan,muss ich ausnutzen.
Servus
Georg |
|
| |
| |
| |
|
|
| Hallo Georg...
Versuchs mal mit Longint (z.B. Handle&) oder einem 4Byte großem Bereich... |
|
| |
| |
| |
|
|
GDL | Hi Andreas,
hast mich missverstanden.Habs mit dem 5.ten Parameter noch nicht versucht,da ich bei einem Fehler nicht weiß,obs fürs System Folgen hat.
Servus
Georg |
|
| |
| |
| |
|
|
| Au verflixt!
Ich meinte naturalmente den 4.Parameter - und damit gibt es keine Problem - aber bitte Longint oder 4Byte Bereich nehmen... |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Hallo Georg,
Du könntest auch erst den ganzen String zusammenfügen und dann an den Editor senden.
declare Inhalt$
Whilenot eof(#1)
input #1,Zeile$
Inhalt$=Zeile$+Chr$(13) + Chr$(10)
Wend
InsertString editor&,Inhalt$
oder den Text in Eine Bereichsvariable laden und dann an das Richeditcontrol senden.
Dafür habe ich allerdings im Moment nicht die entsprechenden Sendmessagewerte parat.
Saluto
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 14.02.2005 ▲ |
|
| |
|
|
| Hallo Georg...
Wenn ich mir da so Jörgs Posting ansehe, hilft dir vielleicht das hier auch noch weiter. Für @addr(TEXT$) kannst du auch einen Bereich einsetzen:
KompilierenMarkierenSeparierenWINDOWSTYLE 31+512
WINDOWTITLE "RichEdit"
WINDOW 0,0-640,440
Declare RichEdit&,DLL_HDL&,Text$
DLL_HDL&=@UseDLL($SYSPATH+"RICHED20.DLL")
LET RichEdit&=@Control("RichEdit20A","",$40000000+$10000000+4+$1000+$800000+$200000+$100000,20,20,300,300,%HWND,2112,%HINSTANCE)
@SENDMESSAGE(RichEdit&,$0400+53,0,$7FFFFFF0)
LEt Text$="Hallo "
@SendMessage(RichEdit&,$00C2,0,@ADDR(Text$)) Text einfügen/ersetzen
LEt Text$="da!"
@SendMessage(RichEdit&,$00C2,0,@ADDR(Text$)) Text einfügen/ersetzen
@SendMessage(RichEdit&,$00B1,6,6) Cursor setzen oder markieren
LEt Text$="du "
@SendMessage(RichEdit&,$00C2,0,@ADDR(Text$)) Text einfügen/ersetzen
whilenot %MENUITEM=-2
WAITINPUT
wend
@DESTROYWINDOW(RichEdit&)
| 15.02.2005 ▲ | |
|
| |
|
|
 | [quote:3b08329bed=Jörg Sellmeyer]Hallo Georg,
Du könntest auch erst den ganzen String zusammenfügen und dann an den Editor senden.
declare Inhalt$
Whilenot eof(#1)
input #1,Zeile$
Inhalt$=Zeile$+Chr$(13) + Chr$(10)
Wend
InsertString editor&,Inhalt$
oder den Text in Eine Bereichsvariable laden und dann an das Richeditcontrol senden.
Dafür habe ich allerdings im Moment nicht die entsprechenden Sendmessagewerte parat.
Saluto
Jörg[/quote:3b08329bed]So ich dies schrieb schon vor 10 Beiträgen.
Salve, iF |
|
| |
| |
| |
|
|
| Beim Brainstorming kommen auch schon mal zwei auf den selben Gedanken... |
|
| |
| |
| |
|
|
GDL | Hi,
Jörg und If,hatte chr$(10) und chr$(13) an String anfügen schon ausprobiert.Egal, ob einzeln einlesen oder zusammenhängend,in beiden
Beispielen wird alles in einem langen String ohne Zeilenumbruch eingefügt.Habe es bereits ganz anders gelöst.Lese erst die File mit eof ohne Insertstring ein,werte meine Zeilen aus und lese dann die ganze File als .txt ins Richedit ein.
Nochmals Danke an Euch und verbleibe mit freundlichen Grüßen
Georg |
|
| |
| |
| |
|
|
| Wird zwar auch nix dran ändern aber in Windows ist es #13#10 statt #10#13.
Salve, iF |
|
| |
| |
| |
|
(454)
Deutsch
English
Français
Español
Italia