XProfan

- Página 2 -

@IF

habe ahora versehentlich en el Codeschnipseln en Su BinPrint geantwortet - es bajo
[...]

Christian

XProfan 8/9.1, Win XP, AMD 64/3200

20.12.2004 ▲

¡Hola Christian...

Yo war en el letzten Tiempo algo con otro Dingen beschäftigt y voluntad veces hoffen, Yo ahora no a spät komme oder total al Thema vorbeischieße...
Leider Yo en el Augenblick no Tiempo, el genau a Testen - aber hast du ya veces probiert, el Parámetro en Anführungszeichen a conjunto?
Kompilieren Marca Separación

Declare Parameter$
LET PARAMETER$=@LOADFILE$("TXT Datei auswählen: ","*.TXT")
@WINEXEC(@ShortName$($WINPATH+"NOTEPAD.EXE")+" "+CHR$(34)+Parameter$+CHR$(34),1)re>

Viele APIs (tal vez todos) haben extreme Problemas, si en el Pfad-/Dateinamen oder el Commandozeile Leerzeichen vorkommen. Setzt uno el Problemstellen en Anführungszeichen funktioniert lo en el Regel.

Wenn Yo correcto verstanden habe, hast du como una muy nützliche Sache antes...

¡Hola AH,

niemand, el a helfen intenta, schießt al Ziel vorbei! Oft genug son una Concepto, auch si ellos tal vez no en aktuellen Problematik weiterhilft, una nützliche Anregung woanders - oder hilft una otro...
La idea con el Leerstellen es bien, bloß scheint lo en mi Problema más en una prinzipielles Word-Problema a handeln. Dasselbe Phänomen tritt auch en, si yo Word con exakt denselben Parametern de el Befehlszeile starte. Offenbar unterstützt Word (egal, welche Versión) con Startparameter sólo Ir y no Expediente Neu.
Aber incluso si dieses Problema no wäre: Yo müßte Word sí todavía una más Parámetro - nämlich mi INI-Expediente - transferencia. In el Fall interpretiert Word esta Dateiangabe como a öffnende Expediente y zeigt sólo el Inhalt el INI a.

Word kann Yo, si auch no bastante así, como ideal wäre, starten a a Eingabemaske meines Makros. Der einzige Schritt, el me todavía fehlt, wäre el Übergabe el Patienten-ID (meist una 4-5-stellige Zahl). Rein theoretisch muß el doch irgendwie posible ser!?

Was el Projekt angeht - el war (y es siempre todavía) wirklich una extremo ehrgeizige Angelegenheit. Der Pulmologe quería eigentlich sólo una Formular, en el automáticamente todos de el Lungenfunktion gelieferten Werte eingetragen y ser unos pocos Felder para el Anamnese (=Patientenangaben a akt. Beschwerden etc.), seine Befunde, Diagnosen y abschließendes Kalkül (qué el Pat. todavía oder no mehr tun darf). Yo habe ihm entonces vorgeschlagen, si yo ya todos Werte disponible habe, ellos doch auch igual auszuwerten (wozu ha uno schließlich una PC?). Als él me erklärte, daß él el para unmöglich hält....brauche Todavía mehr erzählen?
Zu diesem Zeitpunkt Tuve todavía dazu de Pulmologie casi ni idea, aber dafür gibts Bücher y Kollegen! Je mehr Yo mich con el Pulmologie befasst habe, Yo verstanden, wieso él el para unmöglich mantenido ha! Mittlerweile Yo una Treffergenauigkeit el Diagnose de rund 95% erreicht!
Mein größtes Problema war el Generierung uno einzigen Satzes!
Der Hintergrund: El Daten para esta Satz waren en 4 Variables aufgebaut, de denen jede 7 verschiedene Werte annehmen kann - algo encima 16.000 Varianten! - y Satz debería en Punkt y Beistrich grammatikalisch correcto ser. Yo habe mehrere Wochen allein dafür gebraucht - el endgültige Code dazu hatte sólo rund 200 Zeilen!
Knapp 1 1/2 Jahre später war el Pulmologen el Programa immerhin 100.000 öS (rund 7200€) wert! (Hätte Yo el después de Arbeitsstunden verrechnet, sería Yo en su Ordination sitzen y él beim Arbeitsamt de- y eingehen...)
Nun bin Yo esta, el Ganze a profanisieren. WORD-Basic es sólo no mehr bastante aktuell y VisualBasic taugt me nunmal überhaupt no! Lo kann zwar mehr, es aber irrsinnig umständlich, y el automatische Konvertierung el Makros es kläglich gescheitert. Yo habs una vez geschafft, bin aber wochenlang a el Fehlerbereinigung gesessen y luego war el Presentación 3x así groß como vorher y elends langsam.
Dann tener Yo mich sólo en el Búsqueda una Basic-orientierten Programmierwerkzeug gemacht y bin en Euch gelandet. Profano es encima weite Strecken muy ähnlich a WordBasic. Vieles podría Yo sin große Los cambios tomar, bin aber weit flexibler.
Der einzige Schlüssel, el me todavía fehlt, es o.a. Problema.

Und nun genug geschwafelt - todos otra vez a el Arbeit! - y lasst Euch nie entmutigen, si Euch Euer Projekt veces a el Rand el Verzweiflung bringt!

Saludo,
Christian

XProfan 8/9.1, Win XP, AMD 64/3200

[quote:e3d4c6c712=Christian Bernfeld]@IF

habe ahora versehentlich en el Codeschnipseln en Su BinPrint geantwortet - es bajo
[...]

Christian[/quote:e3d4c6c712]Kein Problema así ists doch incluso pensamiento - deshalb haben hier sí Snippets propio Hilos y deshalb Yo natürlich auch hay geantwortet.

Salve, IF

Jörg
Sellmeyer

¡Hola,
Como wäre lo porque, si con Profano el gesamten Texto erstellst.
Das heißt todos Speicherungen de el Ini auslesen u.s.w. y el entonces as Texto speicherst.
Auch una Eingabemaske para el Formular ließe se con Profano ligeramente redactar y el Eingaben en el Ini oder como texto speichern.
B.t.w. - Yo glaube Inis dürfen ne no cierto Größe no überschreiten (64k?).
El Textdatei entonces como Parámetro a Word transferencia y una Makro como Doc con gleichem Namen speicherst?
Saludo
Jörg

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

¡Hola Jörg,
klingt bestechend, Yo denke wahrscheinlich todavía siempre a muy WORD-Basic...

Als Anhang schicke Yo 2 Archivos - diesmal gezippt, sonst se el Admin ernstlich böse ser en mich

- (una Mustergutachten, aún en Word erstellt, y una typische INI ya de el neuen Versión - es aber de una otro Patienten).

Zum Ausprobieren Por favor, folgendes necesariamente beachten:
1. A vollen Funktionalität fehlen sämtliche relevanten Registry-Einträge (unos pocos Hundert)
2. Das Dokument basiert en 2 Vorlagen, de denen sólo 1 en el Dokument como Makros enthalten es. (El 2. se como ADD-IN verwendet y ha rund 800 kB) D.h., lo voluntad viele Características no ir y Fehlermeldungen hageln, aber el Formularfelder kannst Usted todos ausprobieren - más que daß Word meckert, passiert no.
3. Das Gutachten es en Word 95 erstellt, en allen neueren Versionen es una automatische Konvertierung - el debería de estos Makros relativ problemlos trabajo.
4. Um el Schreibschutz a (de-)aktiveren, Por favor, siempre el Icons en el Barra de herramientas (el con el Schlüssel) uso. Word macht nämlich una Fehler beim Aktivieren des Formular-Schreibschutzes: ALLE Felder voluntad geleert....
Wenn Usted el doch veces passieren debería - schließen sin speichern y neu invitar hilft no, porque auch una Autospeicherung beim Schließen instalado es - VORHER Kopie redactar oder nachher otra vez downloaden....

El Ini ha actualmente 4k, viel mehr Será mejor que te va no, außerdem: si yo lo schaffe, con Profano-Bordmitteln así una Formular a redactar, brauche Yo el Ini sólo mehr a Datensicherung, todos Einträge son a Laufzeit como Variable en cualquier momento verfügbar. Das wäre also auch kein Problema.
Nur - como kann Yo una así komplexes Gebilde con Profano remendar? Wobei el Formularfelder entonces no mehr zwingend notwendig wären, porque el Ganze sí online ausgefüllt sería

Saludo,
Christian

Testdateien.zip	21 kB

Kurzbeschreibung:	Mustergutachten de Word y una typische INI

Hochgeladen:	21.12.2004

Ladeanzahl:
		Descargar

XProfan 8/9.1, Win XP, AMD 64/3200

¡Hola, liebe Profaner!
Yo trau mich veces, auszuprobieren, wieweit el Foro lebendig es:
Yo hoffe, Ihr todos habt friedliche Weihnachten verbracht y seid no direkt oder indirekt de el schlimmen Katastrophe en el Indischen Ozean betroffen!
:|
In el Zwischenzeit war Yo auch no untätig y habe en beinahe geistiger Umnachtung wegen schlimmer Kopfschmerzen el Solución meines Winword-Problems geschafft - el Zustand war tal vez hilfreich!?
El Solución es así simplemente, Yo mich fast geniere, no ya früher daraufgekommen a ser!
Drei Zeilen Programmcode - mehr war no - y yo hatte el MISSING LINK a Winword:

WWStart$ = WW$ + /t + ShortName$(UserDOT$) + \ + Pdot$ + /mANLEGEN
con dieser Variables voluntad el Startparameter para Winword eingestellt: El Leerstellen antes y después de /t sowie sólo antes /m son WICHTIG, sonst funktionierts no korrekt!
Shortname$(), en el Word-Problema con el langen Dateinamen en Parameterübergabe a umgehen
********* TESTPARAMETER **********
PatID$ = 1234 el a übergebende Variable
**********************************
PatINI%=@WINEXEC(WWStart$,3) con Winexec bekomme Yo el Handle des aktiven Fensters (=mein Makro-Dialogfenster en el Word-Dokumentvorlage), ahora brauche Yo sólo todavía con
SendString(PatINI%,PatID$) el Handle el deseado Parámetro transferencia - Bingo!

El korrigierte Versión meiner .prf findet Ihr - si lo ya va - en el Attachment, anderenfalls sólo später.
Vielen herzlichen Dank a todos, que Gedanken a mi Problema gemacht haben y me intenta haben a helfen. Tal vez kann mi Concepto auch veces wer otro bien gebrauchen - si esta Problemas auftauchen: sólo a - mi Mail-Adresse es Euch disponible:
In diesem Sinne,
en una erfolgreiches y gesegnetes NEUES JAHR
Christian

WW_starten_VARIABLE_holen.prf	10 kB

Kurzbeschreibung:	Winword starten con Parámetro

Hochgeladen:	29.12.2004

Ladeanzahl:
		Descargar

XProfan 8/9.1, Win XP, AMD 64/3200

29.12.2004 ▲

Das Attachment es no Verfügbar porque el Extension PRF hier gesperrt es. Das ha el Hintergrund el PRFs de mi Server anderweitig interpretiert y ser así el Chaos perfect wäre.

Yo empfehle grundsätzlich como Zip a attachen.

Salve, IF

28.01.2005 ▲

Hi,
Habs ya gemerkt, (.bas es auch gesperrt - quería Normann gerade qué enviar, habs sólo como txt getarnt)
Yo habe gerade gemerkt, daß en el .prf sowieso una kleiner Fehler drin es, schicke entonces el korrigierte zip!

Tal vez podría se zwischenzeitlich alguien Gedanken hacer, como Winword sólo geschlossen se, si la Druckauftrag vollständig gesendet worden es - Yo en el VisualBasic-Ayuda nix wirklich Sinnvolles gefunden. :roll:
(Notfalls täts una corto Warteauftrag.)

Saludo,
Christian

XProfan 8/9.1, Win XP, AMD 64/3200

28.01.2005 ▲

Puedo sólo sagen - winWord ha no cada - kost en efecto Geld - openoffice es libre auch en cada Firma einsetzbar - y el Thema Drucken es gegessen.

Salve, IF

29.01.2005 ▲

Geb Usted vollkommen bastante!
Bloß - como kann Yo en Openoffice el Word-Makros analoge Características ausführen? Como bin Yo desafortunadamente absolut no sattelfest.

In Word-Makros kenn Yo mich dagegen bastante bien de.
Bin gerade bastante eifrig al Basteln para Normann y - hoffentlich - bald fertig.
Das einzige, qué me todavía fehlt, es, Word a überreden, después de Abschicken des Druckauftrags igual en el Nirwana a ir y no blöde Fehlermeldung loszulassen, alles otro va ya!

Falls Usted con Usted con OO bien auskennst - tal vez könntest Usted entonces Comunidad anhand des Beispiels zeigen, como dasselbe con OO realisiert voluntad podría - el wäre para uns todos muy hilfreich (Yo sowohl mi prf como auch el Word-Makro mittlerweile así dokumentiert, daß se cada una Bild hacer kann, qué wo por qué y cómo passiert...)

Saludo,
Christian

XProfan 8/9.1, Win XP, AMD 64/3200

29.01.2005 ▲