Bonjour,
Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
alors que la fonction SetDlgItem passe bien.
Je suis en Windows 2000 SP4.
Quelqu'un voit-il la solution ?
Bonjour,
Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
alors que la fonction SetDlgItem passe bien.
Je suis en Windows 2000 SP4.
Quelqu'un voit-il la solution ?
Bonjour,
Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
alors que la fonction SetDlgItem passe bien.
Je suis en Windows 2000 SP4.
Quelqu'un voit-il la solution ?
Bonjour,
Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
alors que la fonction SetDlgItem passe bien.
Je suis en Windows 2000 SP4.
Bonjour,
Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
alors que la fonction SetDlgItem passe bien.
Je suis en Windows 2000 SP4.
Bonjour,
Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
alors que la fonction SetDlgItem passe bien.
Je suis en Windows 2000 SP4.
On Wed, 16 Jan 2008 20:33:08 +0100, "mml" wrote:
>Bonjour,
>
>Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
>"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
>alors que la fonction SetDlgItem passe bien.
>
>Je suis en Windows 2000 SP4.
>
>Quelqu'un voit-il la solution ?
Problème d'alias?
Déclaration pour la version ANSI :
Private Declare Function GetDlgItemText Lib "user32" Alias
"GetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal
lpString As String, ByVal nMaxCount As Long) As Long
Une alternative : SendMessage avec WM_GETTEXT (c'est que fait
GetDlgItemText)
On Wed, 16 Jan 2008 20:33:08 +0100, "mml" <mml@laginfo.com> wrote:
>Bonjour,
>
>Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
>"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
>alors que la fonction SetDlgItem passe bien.
>
>Je suis en Windows 2000 SP4.
>
>Quelqu'un voit-il la solution ?
Problème d'alias?
Déclaration pour la version ANSI :
Private Declare Function GetDlgItemText Lib "user32" Alias
"GetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal
lpString As String, ByVal nMaxCount As Long) As Long
Une alternative : SendMessage avec WM_GETTEXT (c'est que fait
GetDlgItemText)
On Wed, 16 Jan 2008 20:33:08 +0100, "mml" wrote:
>Bonjour,
>
>Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
>"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
>alors que la fonction SetDlgItem passe bien.
>
>Je suis en Windows 2000 SP4.
>
>Quelqu'un voit-il la solution ?
Problème d'alias?
Déclaration pour la version ANSI :
Private Declare Function GetDlgItemText Lib "user32" Alias
"GetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal
lpString As String, ByVal nMaxCount As Long) As Long
Une alternative : SendMessage avec WM_GETTEXT (c'est que fait
GetDlgItemText)
mml wrote:
> Bonjour,
>
> Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
> "Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
> alors que la fonction SetDlgItem passe bien.
>
> Je suis en Windows 2000 SP4.
Hello,
je ne m'en sers pas tous les jours mais ça m'est
arrivé et je ne me rappelle pas de soucis particuliers.
As tu regardé ceci:
http://support.microsoft.com/kb/267939
Il suffit parfois d'une simple erreur d'inattention dans
le Declare pour avoir ensuite ce genre de messages d'erreur.
Bon débuggage;
Cordialement,
--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
FAQ VB: http://faq.vb.free.fr/
mailto: remove '_no_spam_' ;
mml wrote:
> Bonjour,
>
> Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
> "Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
> alors que la fonction SetDlgItem passe bien.
>
> Je suis en Windows 2000 SP4.
Hello,
je ne m'en sers pas tous les jours mais ça m'est
arrivé et je ne me rappelle pas de soucis particuliers.
As tu regardé ceci:
http://support.microsoft.com/kb/267939
Il suffit parfois d'une simple erreur d'inattention dans
le Declare pour avoir ensuite ce genre de messages d'erreur.
Bon débuggage;
Cordialement,
--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
FAQ VB: http://faq.vb.free.fr/
mailto: remove '_no_spam_' ; _no_spam_jean_marc_n2@yahoo.fr
mml wrote:
> Bonjour,
>
> Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
> "Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
> alors que la fonction SetDlgItem passe bien.
>
> Je suis en Windows 2000 SP4.
Hello,
je ne m'en sers pas tous les jours mais ça m'est
arrivé et je ne me rappelle pas de soucis particuliers.
As tu regardé ceci:
http://support.microsoft.com/kb/267939
Il suffit parfois d'une simple erreur d'inattention dans
le Declare pour avoir ensuite ce genre de messages d'erreur.
Bon débuggage;
Cordialement,
--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
FAQ VB: http://faq.vb.free.fr/
mailto: remove '_no_spam_' ;
On Wed, 16 Jan 2008 20:33:08 +0100, "mml" wrote:
>Bonjour,
>
>Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
>"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
>alors que la fonction SetDlgItem passe bien.
>
>Je suis en Windows 2000 SP4.
>
>Quelqu'un voit-il la solution ?
Problème d'alias?
Déclaration pour la version ANSI :
Private Declare Function GetDlgItemText Lib "user32" Alias
"GetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal
lpString As String, ByVal nMaxCount As Long) As Long
Une alternative : SendMessage avec WM_GETTEXT (c'est que fait
GetDlgItemText)
On Wed, 16 Jan 2008 20:33:08 +0100, "mml" <mml@laginfo.com> wrote:
>Bonjour,
>
>Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
>"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
>alors que la fonction SetDlgItem passe bien.
>
>Je suis en Windows 2000 SP4.
>
>Quelqu'un voit-il la solution ?
Problème d'alias?
Déclaration pour la version ANSI :
Private Declare Function GetDlgItemText Lib "user32" Alias
"GetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal
lpString As String, ByVal nMaxCount As Long) As Long
Une alternative : SendMessage avec WM_GETTEXT (c'est que fait
GetDlgItemText)
On Wed, 16 Jan 2008 20:33:08 +0100, "mml" wrote:
>Bonjour,
>
>Lorsque j'utilise la fonction GetDlgItemText, j'ai le message :
>
>"Point d'entrée de GetDlgItem d'une DLL introuvable dans user32".
>
>alors que la fonction SetDlgItem passe bien.
>
>Je suis en Windows 2000 SP4.
>
>Quelqu'un voit-il la solution ?
Problème d'alias?
Déclaration pour la version ANSI :
Private Declare Function GetDlgItemText Lib "user32" Alias
"GetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal
lpString As String, ByVal nMaxCount As Long) As Long
Une alternative : SendMessage avec WM_GETTEXT (c'est que fait
GetDlgItemText)
D'autre part, pourrai-je avoir un bout de code illustrant la méthode
utilisant SendMessage avec WM_GETTEXT, stp ?
D'autre part, pourrai-je avoir un bout de code illustrant la méthode
utilisant SendMessage avec WM_GETTEXT, stp ?
D'autre part, pourrai-je avoir un bout de code illustrant la méthode
utilisant SendMessage avec WM_GETTEXT, stp ?
Option Explicit
Private Declare Function SendMessage Lib "USER32" Alias "SendMessageA" ( _
ByVal hWnd As Long, ByVal Msg As Long, _
wParam As Any, lParam As Any) As Long
Const WM_GETTEXT As Long = &HD
Private Sub Form_Load()
Text1.PasswordChar = "*"
End Sub
Private Sub Command1_Click()
Dim res As Long
Dim buf As String
buf = Space(255)
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal StrPtr(buf))
buf = StrConv(buf, vbUnicode)
MsgBox "buf = " & buf
End Sub
Option Explicit
Private Declare Function SendMessage Lib "USER32" Alias "SendMessageA" ( _
ByVal hWnd As Long, ByVal Msg As Long, _
wParam As Any, lParam As Any) As Long
Const WM_GETTEXT As Long = &HD
Private Sub Form_Load()
Text1.PasswordChar = "*"
End Sub
Private Sub Command1_Click()
Dim res As Long
Dim buf As String
buf = Space(255)
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal StrPtr(buf))
buf = StrConv(buf, vbUnicode)
MsgBox "buf = " & buf
End Sub
Option Explicit
Private Declare Function SendMessage Lib "USER32" Alias "SendMessageA" ( _
ByVal hWnd As Long, ByVal Msg As Long, _
wParam As Any, lParam As Any) As Long
Const WM_GETTEXT As Long = &HD
Private Sub Form_Load()
Text1.PasswordChar = "*"
End Sub
Private Sub Command1_Click()
Dim res As Long
Dim buf As String
buf = Space(255)
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal StrPtr(buf))
buf = StrConv(buf, vbUnicode)
MsgBox "buf = " & buf
End Sub
On Wed, 16 Jan 2008 22:31:56 +0100, "Jean-marc"
wrote:
Par curiosité, Jean Marc,
est-ce qu'il y a une raison particluière à utiliser StrPtr dans ce cas
? Je l'aurais plutôt écrit comme ça :
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf)
If res Then
MsgBox "buf = " & Left$(buf, res)
End If
On Wed, 16 Jan 2008 22:31:56 +0100, "Jean-marc"
<NO_SPAM_jean_marc_n2@yahoo.fr.invalid> wrote:
Par curiosité, Jean Marc,
est-ce qu'il y a une raison particluière à utiliser StrPtr dans ce cas
? Je l'aurais plutôt écrit comme ça :
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf)
If res Then
MsgBox "buf = " & Left$(buf, res)
End If
On Wed, 16 Jan 2008 22:31:56 +0100, "Jean-marc"
wrote:
Par curiosité, Jean Marc,
est-ce qu'il y a une raison particluière à utiliser StrPtr dans ce cas
? Je l'aurais plutôt écrit comme ça :
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf)
If res Then
MsgBox "buf = " & Left$(buf, res)
End If
parci wrote:
> On Wed, 16 Jan 2008 22:31:56 +0100, "Jean-marc"
> wrote:
> Par curiosité, Jean Marc,
> est-ce qu'il y a une raison particluière à utiliser StrPtr dans ce c as
> ? Je l'aurais plutôt écrit comme ça :
> res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf )
> If res Then
> MsgBox "buf = " & Left$(buf, res)
> End If
Hello Parci,
(( FRANCOIS, si tu nous lis ?? ))
On peut effectivement faire comme tu dis, ça fonctionnera très bien
et économiseras un appel à StrConv(), ce qui est bien !
Le test if res=0 n'est pas utile, on a en effet un res=0 légitime
si la textbox est vide, et Left() ne se plaindra pas dans ce cas.
On pourrait aussi écrire:
buf = Space(255)
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf)
buf = Mid$(buf, 1, InStr(buf, vbNullChar) - 1)
En pratique, je pense que les 2 méthodes (Byval et StrPtr) sont
correctes, avec sans doute un avantage à ta méthode qui évite
le StrConv.
J'aimerais avoir l'avis de François, s'il nous lit ???
parci wrote:
> On Wed, 16 Jan 2008 22:31:56 +0100, "Jean-marc"
> <NO_SPAM_jean_marc...@yahoo.fr.invalid> wrote:
> Par curiosité, Jean Marc,
> est-ce qu'il y a une raison particluière à utiliser StrPtr dans ce c as
> ? Je l'aurais plutôt écrit comme ça :
> res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf )
> If res Then
> MsgBox "buf = " & Left$(buf, res)
> End If
Hello Parci,
(( FRANCOIS, si tu nous lis ?? ))
On peut effectivement faire comme tu dis, ça fonctionnera très bien
et économiseras un appel à StrConv(), ce qui est bien !
Le test if res=0 n'est pas utile, on a en effet un res=0 légitime
si la textbox est vide, et Left() ne se plaindra pas dans ce cas.
On pourrait aussi écrire:
buf = Space(255)
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf)
buf = Mid$(buf, 1, InStr(buf, vbNullChar) - 1)
En pratique, je pense que les 2 méthodes (Byval et StrPtr) sont
correctes, avec sans doute un avantage à ta méthode qui évite
le StrConv.
J'aimerais avoir l'avis de François, s'il nous lit ???
parci wrote:
> On Wed, 16 Jan 2008 22:31:56 +0100, "Jean-marc"
> wrote:
> Par curiosité, Jean Marc,
> est-ce qu'il y a une raison particluière à utiliser StrPtr dans ce c as
> ? Je l'aurais plutôt écrit comme ça :
> res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf )
> If res Then
> MsgBox "buf = " & Left$(buf, res)
> End If
Hello Parci,
(( FRANCOIS, si tu nous lis ?? ))
On peut effectivement faire comme tu dis, ça fonctionnera très bien
et économiseras un appel à StrConv(), ce qui est bien !
Le test if res=0 n'est pas utile, on a en effet un res=0 légitime
si la textbox est vide, et Left() ne se plaindra pas dans ce cas.
On pourrait aussi écrire:
buf = Space(255)
res = SendMessage(Text1.hWnd, WM_GETTEXT, ByVal 255&, ByVal buf)
buf = Mid$(buf, 1, InStr(buf, vbNullChar) - 1)
En pratique, je pense que les 2 méthodes (Byval et StrPtr) sont
correctes, avec sans doute un avantage à ta méthode qui évite
le StrConv.
J'aimerais avoir l'avis de François, s'il nous lit ???
>François Picalausa wrote:
>François Picalausa wrote:
>François Picalausa wrote: