Fórum String para Char #263072

22/12/2004

0

Alguém sabe com fazer para que a função ORD aceite um string?

Por exemplo:

var

v_letra: char;

v_letra:=QBolFin.FieldByName(´rcsituacao´).asstring;

case ORD(v_letra) of
67: v_tipo_situacao:=´Cadastrado´;
82: v_tipo_situacao:=´Realizado´;
80: v_tipo_situacao:=´Previsão´;
76: v_tipo_situacao:=´Conciliado´;
end;


No código acima o erro ocorre na atribuição do valor para a variável v_letra que é do tipo Char. Existe algum função na qual seja possível fazer a atribuição de String para Char, pois a função ORD só aceita variável do tipo Char.


Obrigado.


Airoosp

Airoosp

Responder

Posts

22/12/2004

Jc_analista

PCHAR(´ABCD´);


Responder

Gostei + 0

22/12/2004

Rômulo Barros

v_letra:=QBolFin.FieldByName(´rcsituacao´).asstring[1]; 


:wink: :wink:


Responder

Gostei + 0

22/12/2004

Airoosp

Fiz o teste e funcionou, você pode explicar porque utilizou o [1] após o ASSTRING ?


Obrigado.


Responder

Gostei + 0

22/12/2004

Paulo_amorim

Olá

O [1] é o índice da String que o Undeclared pegou...

Em uma String você pode pegar qualquer caractere pelo índice que ele ocupa...então, 1 eh a primeira letra...

String s := ´Teste´;
s[1] seria ´T´, s[2] seria ´e´, e assim por diante

Até+


Responder

Gostei + 0

22/12/2004

Rômulo Barros

As variáveis do tipo [b:6215219b27]String[/b:6215219b27] é, na verdade, um [b:6215219b27]Array[/b:6215219b27] de [b:6215219b27]Char[/b:6215219b27].

Ex:
  Var 
     Teste : String;
Begin
    Teste := ´12345´;
    ShowMessage(Teste[1]); // Exibirá 1 na tela
    ShowMessage(Teste[2]); // Exibirá 2 na tela
    ShowMessage(Teste[3]); // Exibirá 3 na tela
    ShowMessage(Teste[4]); // Exibirá 4 na tela
    ShowMessage(Teste[5]); // Exibirá 5 na tela
End;


Resumindo: As Varia´veis do tipo Char aceitam apenas um bit (um caractere). Então, quando eu fiz [b:6215219b27].AsString[1][/b:6215219b27] quer dizer que eu estou capturando apenas o primeiro caractere de sua String.


Responder

Gostei + 0

22/12/2004

Airoosp

Valeu, obrigado pelas dicas e informações.


Responder

Gostei + 0

22/12/2004

Rômulo Barros

Valeu, obrigado pelas dicas e informações.


É assim que funciona o fórum: [u:3e1846865a]´Uma mão lava a outra´[/u:3e1846865a]


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar