🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #5523

Re: DLL

#5523
From: Glenner003
Date: Mon, 31 Mar 2003 18:36
48 lines
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-mail
References: <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