Delphi 5 - Grid

[Fábio Teixeira 0]

Olá galera. Estou fazendo um programa usando o delphi5. O que eu pretendo é quando estou adicionando campos na grid clique no "F1" e ele execute uma query dando as opçoes, por exemplo , eu estando no campo funcionario, clico F1 e ele mostra toddos os funcionarios e eu so tenho que seleccionar e ele preenche logo. Que tenho que fazer ? Como eu sei em qual campo ele esta?( se esta nos funcionarios, se esta no codigo etc) . Obrigado, valeu ;) .

[marcio.theis 3]

Faz o seguinte, no evento OnKeyDown do seu DBGrid:

 

//Se a tabela estiver em inserção ou edição e a tecla for F1, segue no procedimento
if (tabela.State in [dsInsert, dsEdit]) and (key = 112) then
	begin
	//Se estiver sobre o CAMPOFUNCIONARIO do DBGRID, entra e executa
	if (DBGrid1.Columns.Grid.SelectedField = tabelaCAMPOFUNCIONARIO) then
		begin
		//Código da sua tela de localização
		end;
	//Se estiver sobre o CAMPOQUALQUER do DBGRID, entra e executa
	if (DBGrid1.Columns.Grid.SelectedField = tabelaCAMPOQUALQUER) then
		begin
		//Código da sua tela de localização
		end;
	end;