Var sWinDir: AnsiString;
nTam: Integer;
begin
nTam := MAX_PATH;
SetLength(sWinDir,nTam);
GetWindowsDirectory( PChar( sWinDir ), nTam )
SetLength(sWinDir,nTam);
end;
Mostrando postagens com marcador Convertendo pchar para string. Mostrar todas as postagens
Mostrando postagens com marcador Convertendo pchar para string. Mostrar todas as postagens
quarta-feira, 25 de novembro de 2009
sábado, 6 de junho de 2009
Convertendo pchar para string
Var
sWinDir: AnsiString;
nTam: Integer;
Begin
nTam := MAX_PATH;
SetLength(sWinDir,nTam);
GetWindowsDirectory( PChar( sWinDir ), nTam )
SetLength(sWinDir,nTam);
End;
sWinDir: AnsiString;
nTam: Integer;
Begin
nTam := MAX_PATH;
SetLength(sWinDir,nTam);
GetWindowsDirectory( PChar( sWinDir ), nTam )
SetLength(sWinDir,nTam);
End;
Assinar:
Postagens (Atom)
