procedure ActiveFormCreate(Sender: TObject);

Hej Jens

Det er en bug helt tilbage fra D3/D4

Prøv at putte
OleInitialize() i
Oncreate eventen og OleUnitialize() i
OnDestroy eventen

-------------------------------------

BTW
Er du ikke mand for at lave http://www.eksperten.dk/spm/130314
i tråde.

Stoney

Stoney>>  Jeg kan ikke få det til at virke .. kan du ikke lave et eksermple ?

Jens B

Jens >>  Kan du vente til i aften. Jeg har herre travlt lige nu ?

Stoney

nemt ..

Jens >> Det lykekdes mig at lave 1 OCX i går aftes
hvor efter min Delphi tiltede og nu kan jeg af en eller anden grund ikke lave OCX\'er. Hvergang jeg deployer siger den OCX\'en bruges af en anden proces.

Det eks. jeg lavede som virker med en OnCreate event er:

En label på formen

function GetWindowsLanguage : string;
var
WinLanguage: array [0..50] of char;
begin
VerLanguageName(GetSystemDefaultLangID,WinLanguage,50);
Result := StrPas(WinLanguage);
end;

oncreate event:

Label1.caption :=(GetWindowsLanguage);

Når formen vises skrives computeren\'s sprog

Håber du kan bruge det

Jeg kigger på det igen i aften

Stoney

Jens>> kan du få det til at virke

Stoney

Hej Stoney ....

Det var nu ikke sproget i windows jeg var på jagt efter .... Men en parameter jeg selv medgiver til min ActiveX Kontol ....

Det andet problem er fordi du nede i dit Windows biblotwek under \"Downloaded ProgramFiles\" der ligger din Kørende version af din ActiveX kontrol ..... Den skal du slette ...

Der efter skal du under Run i din Delphi vælge Register ActiveX kontrol . Så er du ude overe det ....

Jens B

Jens >> kan du ikke fortælle mig hvordan du selv medgiver denne parameter, så vil jeg prøve igen


Stoney

Jeg har meget dårlig tid lige pt.  Jeg fandt en anden udvej .....

Jens B

hgvjhgfjhg