Article View: be.comp.programming
Article #5523Re: DLL
From: Glenner003
Date: Mon, 31 Mar 2003 18:36
Date: Mon, 31 Mar 2003 18:36
48 lines
2752 bytes
2752 bytes
Hallo,
Voor het doorgeven van die handle kan je ofwel het HANDLE type van Delphi
gebruiken(in de windows unit of zo) ofwel een gewone integer.
Je kan dan via de systeemfuncties ReadFile of ReadFileEx gaan lezen in het
bestand.
(meer ino kan je vinden in de windows sdk help die bij delphi zit)
Maar is het niet veel gemakkelijker om de naam van het bestand door te geven
aan de DLL ipv een handle naar een open bestand? Dan kan je immers de
standaard functies en procedures van pascal(nu dus Delphi) gebruiken
(assignfile, reset, write, read, ...).
(je moet daarvoor een parameter van het type PCHAR gebruiken)
Vriendelijke groeten
Glenn.
"Ivan Van den Bossche" <ivan.van.den.bossche@pandora.be> wrote in message
news:N0Kaa.3669$Vq.422@afrodite.telenet-ops.be...
> Hi,
>
> Ik heb een routine in een Delphi DLL zitten die ik wil aanspreken vanuit
een
> C toepassing. De functie die in de Delphi DLL zit zou als parameter een
> HANDLE moeten bevatten. Het volgende voorbeeld zal meer duidelijkheid
> bieden:
>
> HANDLE hFile = NULL;
> hFile = CreateFile("c://BROL/00002.SPL", GENERIC_READ, FILE_SHARE_READ,
> NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
>
> Ik open dus in mijn C toepassing een file. Nu is het de bedoeling dat ik
> deze HANDLE (hFile) doorgeef aan een functie die in DLL zit die is
> geschreven in Delphi (Object Pascal)... Zodat ik deze geopende file
verder
> kan inlezen/bewerken vanuit die Delphi module. Weet er iemand hoe ik dat
> moet doen, eventueel met een voorbeeld?
>
> Alvast bedankt,
>
> Groeten,
> Ivan
>
>
>
>
Technical Details
Message-ID:
<aV%ha.16272$t_2.1625@afrodite.telenet-ops.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-06!sn-xit-09!supernews.com!iad-peer.news.verio.net!news.verio.net!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mailReferences:
<N0Kaa.3669$Vq.422@afrodite.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit X-Google-Thread: 107324,2ddffd587659f35b X-Google-Attributes: gid107324,public X-Google-Thread: fcea4,2ddffd587659f35b X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2003-03-31 10:38:19 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-06!sn-xit-09!supernews.com!iad-peer.news.verio.net!news.verio.net!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail From: "Glenner003" <ikke@null.com> Newsgroups: be.comp.programming,nl.comp.programmeren References: <N0Kaa.3669$Vq.422@afrodite.telenet-ops.be> Subject: Re: DLL Lines: 50 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.00.2919.6700 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 Message-ID: <aV%ha.16272$t_2.1625@afrodite.telenet-ops.be> Date: Mon, 31 Mar 2003 18:36:54 GMT NNTP-Posting-Host: 81.82.138.11 X-Complaints-To: abuse@telenet.be X-Trace: afrodite.telenet-ops.be 1049135814 81.82.138.11 (Mon, 31 Mar 2003 20:36:54 MET DST) NNTP-Posting-Date: Mon, 31 Mar 2003 20:36:54 MET DST Organization: Telenet Internet