XProfan

- Página 2 -

Uwe
''Pascal''
Niemeier

Hi Jörg!

Dies podría helfen:
Kompilieren Marca Separación

window 500,500
 $H Windows.ph
declare Key$,Handle&,Count%,Error&
declare Result#:dim Result#,256
Key$=readini$("HKEY_0",".prf","")+"\Shell"
Error&=~RegOpenKeyEx(~HKEY_CLASSES_ROOT,addr(Key$),0,~KEY_ENUMERATE_SUB_KEYS,addr(Handle&))

whilenot Error&-- 0 = OK

    Error&=~RegEnumKey(Handle&,Count%,Result#,256)
    case Error&:break
    print readini$("HKEY_0",Key$+"\"+string$(Result#,0)+"\Command","")
    inc Count%

endwhile

~RegCloseKey(Handle&)
dispose Result#
KompilierenMarcaSeparaciónwindow 500,500
declarar Exe#:dim Exe#,260
var File$="X:Test.prf"---------existierende(!) Expediente
var OK&=external("shell32","FindExecutableA",addr(File$),0,Exe#)
caso OK&<=32:imprimir "Fehler:",OK&--Fehlercodes siehe @WinExec
imprimir cadena$(Exe#,0)
disponer Exe#
waitkey

HTH
Pascal

Dieter
Zornow

Lo va en efecto de el EnvironmentVariablen auszulesen, Yo weiß pero no welches Programa esta anlegt. Das Setup oder el Editor. En me kommt pero en el Abfrage el aktuelle Prfrun32.exe. Mit "XPR_PATH" bekomme Yo, el Incluir-Ordner.
Kompilieren Marca Separación

var size& = External("Kernel32","GetEnvironmentVariableA","XPR_RUNTIME",spec#,261)
var indir$ = string$(spec#,0)e>

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Jörg
Sellmeyer

Yo sehs ya: Yo tengo mi Cuestión unpräzise gestellt. El Cuestión después de el Struktur war eigentlich no así wichtig. Das Yo eigentlich wissen voluntad, es:
Espectáculos mein Programa en euch en el Combobox irgendetwas a?
Und si Profanversionen son, son como el korrekten Versionsnummern con esta?

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

E.T.

En me se sólo una Versión gelistet:

El Versión puede ser se aber auch sólo de el Pfad ableiten.

El Versionen 9,10, 11 & XProfanFree voluntad No se ha encontrado / gelistet (jeweils bajo /Programas installiert).

test.png	5 kB

Hochgeladen:	03.01.2010

Ladeanzahl:
		Descargar

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...

Matthias
Arlt

En me voluntad allen vorhandenen Profano-Versionen gelistet. Das son actualmente 7.6, 8.0, 9.1 y 11.2free. (Anm.: Strukturell Yo el ähnlich organisiert, como Pascal. Also keinerlei Standardinstallationen...). Was el Versionsnummern angeht, así voluntad ellos sólo teilweise correcto adecuado.

Saludo Matthias

WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia

Dieter
Zornow

Also en me se gar no adecuado, el Combobox es leer.

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Rolf
Koch

En me auch leer

Paul
Glatz

En me issts leer

Frank
Abbing

Sucht largo, findet nix.

Matthias
Arlt

Hm...como bin Yo a ahora sí así bastante allein en más Flur.
Schon komisch, por qué sólo funktioniert en el me así einigermaßen...?????

WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia

Also Yo benutze XProfan-Kompiler simplemente genau así, como todos otro Kompiler auch. Was vlt. Sinn macht wäre una manuell pflegbare Liste y doble clic en se
Kompilieren Marca Separación

 {$COMPILER ...}
 {$RUNTIME ...}e>

eingefügt o. ersetzt womit el Einstellung auch en el Dokument gespeichert es. ^ ^

Matthias
Arlt

Jetzt me está klar, por qué el Auslesen en me klappt y en otro no. Offenbar sucht el Rutina sólo exakt después de PROFAN.EXE. En me es el wegen el Kompatibilität a PRFellow auch el Fall. Sombrero el Interpreter una abweichenden Dateinamen, se él folglich No se ha encontrado.

Saludo Matthias

WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia

04.01.2010 ▲