Article View: microsoft.public.vb.com
Article #1Re: How to use pointers in VB 6
From: noNO
Date: Sun, 02 Jul 2000 00:00
Date: Sun, 02 Jul 2000 00:00
93 lines
4237 bytes
4237 bytes
This is a multi-part message in MIME format. ------=_NextPart_000_0037_01BFE442.0BDAB400 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable From the MSDN library: Declare Function PtrToStr Lib "Kernel32" Alias "lstrcpyW" _ (RetVal As Byte, ByVal Ptr As Long) As Long Declare Function StrToPtr Lib "Kernel32" Alias "lstrcpyW" _ (ByVal Ptr As Long, Source As Byte) As Long Declare Function PtrToInt Lib "Kernel32" Alias "lstrcpynW" _ (RetVal As Any, ByVal Ptr As Long, ByVal nCharCount As Long) As Long Declare Function StrLen Lib "Kernel32" Alias "lstrlenW" _ (ByVal Ptr As Long) As Long Should check MSDN for more details. "Minicooper News" <Minicooper@quadrat.be> wrote in message = news:7L4Z4.26$HX3.1588@nreader1.kpnqwest.net... Is there a possibility to use pointers in a VB application ? If so, = how ? Where can i find info about this ? mailto: minicooper@quadrat.be ------=_NextPart_000_0037_01BFE442.0BDAB400 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2920.0" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#c0dcc0> <DIV><FONT face=3DArial size=3D2>From the MSDN library:</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2><BR> Declare Function = PtrToStr Lib=20 "Kernel32" Alias "<FONT color=3D#ffffff=20 style=3D"BACKGROUND-COLOR: #0a246a">lstrcpyW</FONT>" _<BR> = (RetVal As=20 Byte, ByVal Ptr As Long) As Long<BR><BR> Declare Function = StrToPtr=20 Lib "Kernel32" Alias "<FONT color=3D#ffffff=20 style=3D"BACKGROUND-COLOR: #0a246a">lstrcpyW</FONT>" _<BR> = (ByVal Ptr=20 As Long, Source As Byte) As Long<BR><BR> Declare Function = PtrToInt=20 Lib "Kernel32" Alias "lstrcpynW" _<BR> (RetVal As Any, ByVal = Ptr As=20 Long, ByVal nCharCount As Long) As Long<BR><BR> Declare = Function=20 StrLen Lib "Kernel32" Alias "lstrlenW" _<BR> (ByVal Ptr As = Long) As=20 Long<BR></FONT></DIV> <DIV><FONT face=3DArial size=3D2>Should check MSDN for more = details.</FONT></DIV> <DIV><FONT face=3DArial size=3D2> </DIV></FONT> <BLOCKQUOTE=20 style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: = 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px"> <DIV>"Minicooper News" <<A=20 href=3D"mailto:Minicooper@quadrat.be">Minicooper@quadrat.be</A>> = wrote in=20 message <A=20 = href=3D"news:7L4Z4.26$HX3.1588@nreader1.kpnqwest.net">news:7L4Z4.26$HX3.1= 588@nreader1.kpnqwest.net</A>...</DIV> <DIV><FONT face=3DArial size=3D2>Is there a possibility to use = pointers in a VB=20 application ? If so, how ?</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Where can i find info about this = ?</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>mailto: <A=20 = href=3D"mailto:minicooper@quadrat.be">minicooper@quadrat.be</A></FONT></D= IV> <DIV> </DIV></BLOCKQUOTE></BODY></HTML> ------=_NextPart_000_0037_01BFE442.0BDAB400--
Technical Details
Message-ID:
<rjI75.37$T97.1145@nreader1.kpnqwest.net>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<7L4Z4.26$HX3.1588@nreader1.kpnqwest.net>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fcea4,d879730e8abce59d X-Google-Attributes: gidfcea4,public X-Google-Thread: 10941f,d879730e8abce59d X-Google-Attributes: gid10941f,public From: "noNO" <nono@softhome.net> Subject: Re: How to use pointers in VB 6 Date: 2000/07/02 Message-ID: <rjI75.37$T97.1145@nreader1.kpnqwest.net> X-Deja-AN: 641494586 References: <7L4Z4.26$HX3.1588@nreader1.kpnqwest.net> X-Priority: 3 Content-Type: multipart/alternative; boundary="----=_NextPart_000_0037_01BFE442.0BDAB400" X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 X-Complaints-To: newsmaster@kpnqwest.net X-Trace: nreader1.kpnqwest.net 962548055 195.0.19.178 (Sun, 02 Jul 2000 16:27:35 MET DST) Organization: KPNQwest customer news service X-MSMail-Priority: Normal MIME-Version: 1.0 NNTP-Posting-Date: Sun, 02 Jul 2000 16:27:35 MET DST Newsgroups: microsoft.public.vb.com,be.comp.programming