Erro na declara��o do tipo PChar - D2005

Question

Pessoal,pq acontce o erro abaixo[Error] Unit1.pas(30): E2410 Unsafe pointer variables, parameters or consts only allowed in unsafe procedureisso ocorre nesta linha[code:1:939028ed89]var   Computer: PC...

Caninha51 · Answer

Posta um trecho maior do c�digo, num deu erro aki naum....

Wagnermarrane · Answer

[quote:85838bef71=�caninha51�]Posta um trecho maior do c�digo, num deu erro aki naum.[/quote:85838bef71][code:1:85838bef71]procedure TForm1.BitBtn1Click(Sender: TObject);var   Computer: PChar;   CSize: DWORD;beginComputer:=#0;CSize:=MAX_COMPUTERNAME_LENGTH + 1;try    GetMem(Computer,CSize);    if Windows.GetComputerName(Computer,CSize ) then        ShowMessage(Computer);finally    FreeMem(Computer);    end;end;[/code:1:85838bef71]ai esta o c�digo todo.... e o erro [b:85838bef71][Error] Unit1.pas(30): E2410 Unsafe pointer variables, parameters or consts only allowed in unsafe procedure [/b:85838bef71]continua.... to achando que � a instala��o do meu delphi...

Caninha51 · Answer

Amigo, seu c�digo funcionou perfeitamente aki.

tenta...

var
  Computer: String;
  CSize: DWord;
begin
  CSize := MAX_COMPUTERNAME_LENGTH + 1;
  SetLength(Computer, CSize);
  Windows.GetComputerName(PChar(Computer), CSize);
  Showmessage(PChar(Computer));
end;

Wagnermarrane · Answer

[quote:52e31bdda4=�caninha51�]Amigo, seu c�digo funcionou perfeitamente aki.tenta...[code:1:52e31bdda4]var  Computer: String;  CSize: DWord;begin  CSize := MAX_COMPUTERNAME_LENGTH + 1;  SetLength(Computer, CSize);  Windows.GetComputerName(PChar(Computer), CSize);  Showmessage(PChar(Computer));end;[/code:1:52e31bdda4][/quote:52e31bdda4]ai Caninha ... to achando que o meu delph esta com problemas pq o c�digo q vc mandou n�o rodou na minha maquina..... q ruim..... por�m dx eu tirar uma duvida a minha maquina � SO - Windows 2003 server e to com Delphi 2005..... sem problemas a fun��o era para rodar corretamente, certo?s� q no seu c�digo o erro que apresenta � este:[code:1:52e31bdda4]  SetLength(Computer, CSize);  Windows.GetComputerName(PChar(Computer), CSize);[/code:1:52e31bdda4][b:52e31bdda4][Error] Unit1.pas(33): E2089 Invalid typecast[/b:52e31bdda4]To quase desisitindo.... vou desinstalar o Delphi e reinstalar para solucionar minha duvida.... mas se tiver alguma id�ia posta camaraad...abra�o...

Caninha51 · Answer

Rapaz, o problema eh com o typecast do Pchar.
Num sei se eh no teu 2005 ou em todos 2005 que acontecem este problema.

Eu num uso o 2005 ainda naum, ainda tow no 7.

Se aparecesse algum com o 2005 pra testar esse c�digo neh?
Vamos esperar!:D

flw

F�rum Erro na declara��o do tipo PChar - D2005 #307586