Atribuir SQL a varialvel

[nsouza]

Colegas,

como iniciante tive dificuldade em atribuir valor a uma varial

Após concatenar campoa pretendia o seguinte resultado em um TCombobox

001 - Mecânico

O que fiz

Declarei uma varial

var combo :string;

varcod:integer;

begin

varcod:= dm.Cds_Funcionario.fieldbyname('CODESPECIALIDADE').AsInteger;

combo:='select descricao from especialidade where codigo='+ IntToStr(varcod);

cbEspecialidade.Text := (stringofchar('0',3-length(DM.Cds_Funcionario.FieldByName('CODESPECIALIDADE').AsString)) + DM.Cds_Funcionario.FieldByName('CODESPECIALIDADE').AsString + ' - ' + combo);

end;

No geral funcionou, mas o resultado foi

001 - select descricao from especialidade where codigo=1

Ao invés de mostra, 001 - Mecânico, mostrou o que digitei na variavel, 001 - select descricao from especialidade where codigo=1 ou seja não esta rodando a consulta SQL.

alguém poderia me dar uma ajuda ao digitar o codigo correto ao atribuir o valor da variavel?

[Leonardo C. Cavalcante]

Boa Noite. Não consegui entender exatamente qual é sua necessidade, Talvez o que você precise seja um lookupCombobox para LIstar a descrição e gravar o código.

Mas então, tenta explicar melhor para o que você precisa e Estou a disposição para ajudar.

Abraços!