Pegar letra do texto do RadioGroup

Delphi

23/03/2004

Olá pessoal...
No radiogroup ele grava o numero do item selecionado, estou querendo pegar a primeira letra do texto de um radiogroup. Por exemplo:

* Entrada
* Saída

Queria levar apenas para o banco E ou S. Como faço isso??

Grato pela ajuda.


Rssampaio

Rssampaio

Curtidas 0

Melhor post

Aroldo Zanela

Aroldo Zanela

23/03/2004

Colega,

Exemplo:

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
  ShowMessage(Copy(RadioGroup1.Items[RadioGroup1.ItemIndex],1,1));
end;



GOSTEI 1
POSTAR