Guest PAS Postado Abril 7, 2008 Denunciar Share Postado Abril 7, 2008 eu consigo fazer somente usando Ord(x) passando x como letranão consigo fazer passando o valor no edit1 como faco?Letra:= edit1.text;valor:= Ord(Edit1.text); Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Jhonas Postado Abril 7, 2008 Denunciar Share Postado Abril 7, 2008 eu consigo fazer somente usando Ord(x) passando x como letranão consigo fazer passando o valor no edit1 como faco?Letra:= edit1.text;valor:= Ord(Edit1.text);voce deve usar o evento OnKeyPress do editprocedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin label1.Caption := inttostr(ord(key)); end;abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Micheus Postado Abril 7, 2008 Denunciar Share Postado Abril 7, 2008 Apenas para auxiliar na compreensão...eu consigo fazer somente usando Ord(x) passando x como letranão consigo fazer passando o valor no edit1 como faco?PAS, o motivo de você não conseguir compilar deve-se ao fato de o parâmetro passado a função Ord deve ser um caracter e, ao passar Edit1.Text, você está tentando passar uma string (seqüência de caracteres).A forma como Jhonas lhe sugeriu, faz justamente isto, utiliza o caracter pressionado (apenas um caracter). Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guest PAS
eu consigo fazer somente usando Ord(x) passando x como letra
não consigo fazer passando o valor no edit1 como faco?
Letra:= edit1.text;
valor:= Ord(Edit1.text);
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.