XProfan

- page 2 -

Uwe
''Pascal''
Niemeier

Hi Jörg!

ca pourrait aider:
Kompilieren Marque Séparation

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#
KompilierenMarqueSéparationwindow 500,500
declare Exe#:dim Exe#,260
var File$="X:Test.prf"---------existierende(!) Dossier
var OK&=external("shell32","FindExecutableA",addr(File$),0,Exe#)
cas OK&<=32:imprimer "Fehler:",OK&--Fehlercodes siehe @WinExec
imprimer string$(Exe#,0)
dispose Exe#
waitkey

HTH
Pascal

Dieter
Zornow

und dir oui aussi aus den EnvironmentVariablen auszulesen, je sais mais pas welches Programme cet anlegt. cela Setup ou bien qui Editor. chez mir venez mais chez qui Abfrage qui aktuelle Prfrun32.exe. avec "XPR_PATH" bekomme Je l' Include-Dossier.
Kompilieren Marque Séparation

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

je sehs déjà: je hab mon Frage unpräzise gestellt. qui Frage pour qui Struktur était eigentlich pas so important. cela quoi je eigentlich savons veux, ist:
Zeigt mon Programme chez euch dans qui Combobox irgendetwas à?
et si es Profanversionen sommes, sommes là qui korrekten Versionsnummern avec dabei?

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

E.T.

chez mir wird seulement une Version gelistet:

qui Version peux on sich mais aussi seulement aus dem Pfad ableiten.

qui Versionen 9,10, 11 & XProfanFree volonté pas trouvé / gelistet (jeweils sous /Programme installiert).

test.png	5 kB

Hochgeladen:	03.01.2010

Downloadcounter:
		Download

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

chez mir volonté allen vorhandenen Profan-Versionen gelistet. ce sont derzeit 7.6, 8.0, 9.1 et 11.2free. (Anm.: Strukturell habe je cela ähnlich organisiert, comment Pascal. alors keinerlei Standardinstallationen...). quoi qui Versionsnummern angeht, so volonté vous seulement partiellement richtig angezeigt.

Salut Matthias

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

Dieter
Zornow

alors chez mir wird gar aucun angezeigt, qui Combobox ist vide.

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

chez mir aussi vide

Paul
Glatz

chez mir issts vide

Frank
Abbing

cherchez longtemps, findet nix.

Matthias
Arlt

Hm...là suis je jusqu'à maintenant oui so assez seul sur plus entrée.
déjà komisch, pourquoi seulement funktioniert cela chez mir so einigermaßen...?????

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

alors je benutze XProfan-Kompiler simple oui c'est ca so, comment alle anderen Kompiler aussi. quoi vlt. Sinn pouvoir wäre une manuel pflegbare liste et chez Double-cliquez sur wird
Kompilieren Marque Séparation

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

eingefügt bzw. ersetzt womit qui Einstellung aussi im Dokument gespeichert ist. ^ ^

Matthias
Arlt

maintenant c'est moi bien sûr, pourquoi cela Lecture chez mir klappt et chez anderen pas. évident cherchez qui Routine seulement exakt pour PROFANE.EXE. chez mir ist cela à cause de qui Kompatibilität trop PRFellow aussi qui le cas. Hat qui Interpreter une abweichenden Dateinamen, wird il folglich pas trouvé.

Salut Matthias

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

04.01.2010 ▲