Kald af funktion i OCX

Tags:    delphi

Hej alle

Jeg er meget ny i Delphi og er allerede gået fast. Bruger D5.

Problemet er at jeg har en OCX med nogle procedurer og funktioner.

Denne virker fint: (Label1.Caption bliver fint opdateret!)
procedure TForm1.LapZOCX1RegisterCar(Sender: TObject; var iCarID: Smallint;
var lMilliseconds: Integer);
begin
Label1.Caption := IntToStr(iCarID);
end;

Men denne gør ikke:
procedure TForm1.Button1Click(Sender: TObject);
var
test: WordBOOL;
begin
test := LapZOCX1.StartRace();
end;

Når jeg trykker på Button1 kommer der en fejl:
project1.exe raised exception class EoleException with message 'OLE error 800A01A9' Process stopped.

Hjælp!



2 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma
Sorter efter stemmer Sorter efter dato
Det kunne umiddelbart tyde på en fejl i implementation-delen af dit interface til TLB. Hvis du evt. listede koden eller gav et link til LabZOCX...._TLB.PAS ville det muligvis være nemmere at give et svar...

mvh
hsv



Det kunne umiddelbart tyde på en fejl i implementation-delen af dit interface til TLB. Hvis du evt. listede koden eller gav et link til LabZOCX...._TLB.PAS ville det muligvis være nemmere at give et svar...

mvh
hsv

Hej hsv

Jeg fandt andre eksempler på at Delphi ikke altid kunne håndtere OCX filer (Fordi de sikkert er skrevet i andet sprog) og de 'workarounds' der var, var lidt for langhåret til mig.

Så jeg bed i det sure æble og lavede programmet i VB....



t