Pesquisa com RadioGroup..
Ola pessoal quero fazer uma pesquisa com este form:
Coloquei um radiogroup com três opções (Numero OS, Nome e Telefone)
Tenho estes campos em uma tabela chamada Tab_abertura_Os.
Quero que quando selecione uma das opções acima relatada e assim que seja digitada uma informação um formulario que já trabalha com esta tabela possa ser aberta para que seja feita as alterações desejadas.
Sera que é possivel isto.
Erivan Marinho
[img][/img]
Coloquei um radiogroup com três opções (Numero OS, Nome e Telefone)
Tenho estes campos em uma tabela chamada Tab_abertura_Os.
Quero que quando selecione uma das opções acima relatada e assim que seja digitada uma informação um formulario que já trabalha com esta tabela possa ser aberta para que seja feita as alterações desejadas.
Sera que é possivel isto.
Erivan Marinho
[img][/img]
Peninha
Curtidas 0
Respostas
Rômulo Barros
14/09/2004
procedure TForm1.SpeedButton1Click(Sender: TObject); begin Case RadioGroup1.ItemIndex Of 0 : // NumeroOs; Begin If(DataModule.Tab_abertura_Os.Locate(´NumeroOs´,EditOpcao.Text,[]))Then Begin DataModule.Tab_abertura_Os.Edit; FormularioParaEdicao.Show; End; End; 1 : // Nome; Begin If(DataModule.Tab_abertura_Os.Locate(´Nome´,EditOpcao.Text,[]))Then Begin DataModule.Tab_abertura_Os.Edit; FormularioParaEdicao.Show; End; End; 2 : // Telefone; Begin If(DataModule.Tab_abertura_Os.Locate(´Telefone´,EditOpcao.Text,[]))Then Begin DataModule.Tab_abertura_Os.Edit; FormularioParaEdicao.Show; End; End; End; end;
:wink: :wink: :wink: :wink: :wink: :wink: :wink:
GOSTEI 0
Peninha
14/09/2004
Bom amigo agradeço-lhe muito pela ajuda, muito obrigado mesmo.
Erivan Marinho
Erivan Marinho
GOSTEI 0