Meu caro, vc está muito equivocado. Não tem sentido algum fazer esse typecast
pra PChar. PChar é um tipo de ponteiro, e por esse motivo que vc está tendo o
erro 'Incompatible types'. Faça assim:
1) Se wPrimLetra é do tipo Char, faça simplesmente assim:
ShowMessage(Format('%d',
enumerados, e
tipos de subrange.
Sds.
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 16 Apr 2008 18:42:57 +
Subject: RE: [delphi-br] String X pChar
Meu caro, vc está muito equivocado. Não tem sentido algum fazer esse typecast
pra
wPrimLetra := 'A';
ShowMessage( IntToStr( Ord( wPrimLetra )) );
Caros,
Estou tentando retornar o código ASCII de uma letra:
wPrimLetra := 'A';
ShowMessage( IntToStr( Ord( pchar( wPrimLetra ))) );
Mas dá o seguinte erro:
[Error] UnitCadPlacas. pas(742): E2008 Incompatible types.
Pôxa, é isso mesmo amigo...
Obrigado!
sds
Adjalma
Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu:
Meu caro, vc está muito equivocado. Não tem sentido algum fazer esse typecast
pra PChar. PChar é um tipo de ponteiro, e por esse motivo que vc está tendo o
erro
Retirado do DTDelphi 2.8
{ - Coloque um Label no form (Label1);
- Mude a propriedade KeyPreview do form para true;
- Altere o evento OnKeyDown do form como abaixo: }
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Label1.Caption :=
Format('O
5 matches
Mail list logo