function read_password(buffer: pchar) : boolean;
stdcall; external 'Test.dll' name 'Misc_func1';
procedure TForm1.BitBtn1Click(Sender: TObject);
var
buffer : array [0..20] of byte;
begin
if read_password(pchar(@buffer)) then
showmessage('password = '+strpas(pchar(@buffer)))
else
showmessage('read_password error ');
end;
델파이 구문인데요... VB 구문으로 변경 부탁합니다...
고수님들의 도움 부탁드립니다..... 꾸벅