Ajuda combobox
Tenho que gravar o conteudo de um combobox em uma tabela , sendo que antes eu gravo uns edits, como faço. essa e uma parte do codigo mas sem o combobox.
Grato. :D
if MessageDlg (´Confirma Inclusão?´, mtConfirmation, [mbYes, mbNo], 0) = mrYes Then
Table1.InsertRecord ([Edit1.Text,Edit2.Text,Edit3.Text,Edit4.Text,Edit5.Text,Edit6.Text]);
begin
Edit1.Text := ´´ ;
Edit2.Text := ´´ ;
Edit3.Text := ´´ ;
Edit4.Text := ´´ ;
Edit5.Text := ´´ ;
Edit6.Text := ´´ ;
end;
Grato. :D
if MessageDlg (´Confirma Inclusão?´, mtConfirmation, [mbYes, mbNo], 0) = mrYes Then
Table1.InsertRecord ([Edit1.Text,Edit2.Text,Edit3.Text,Edit4.Text,Edit5.Text,Edit6.Text]);
begin
Edit1.Text := ´´ ;
Edit2.Text := ´´ ;
Edit3.Text := ´´ ;
Edit4.Text := ´´ ;
Edit5.Text := ´´ ;
Edit6.Text := ´´ ;
end;
Curty
Curtidas 0
Respostas
Koplin
07/09/2003
Faltou uns detalhes:
Quando voce fala de conteúdo é o texto ou todos os itens?
Se forem os itens: Ficará um em cada coluna do mesmo registro?
Se for, quantos itens e quantos campos?
Passa mais detalhes
Quando voce fala de conteúdo é o texto ou todos os itens?
Se forem os itens: Ficará um em cada coluna do mesmo registro?
Se for, quantos itens e quantos campos?
Passa mais detalhes
GOSTEI 0
Curty
07/09/2003
o item que ficar selecionado no combobox tipo ´gerente´ ser gravado no campo ´função´ da tabela, já que da forma que escrevi os edits ja são gravados na mesma. :wink:
GOSTEI 0
Koplin
07/09/2003
Combobox1.text
deve resolver seu problema
deve resolver seu problema
GOSTEI 0
Curty
07/09/2003
Valeu a dica, resolveu o problema, o proximo é e como fazer apos a clicar no botao inclusao deixar vazio o seu conteudo :?:
GOSTEI 0
Koplin
07/09/2003
Tente a procedure Clear
Edit1.clear;
ComboBox1.clear;
etc...
Edit1.clear;
ComboBox1.clear;
etc...
GOSTEI 0
Koplin
07/09/2003
Tente a procedure Clear
Edit1.clear;
ComboBox1.clear;
etc...
ComboBox1.clear; limpa todos os itens
ComboBox1.text:=´´; limpa o texto
GOSTEI 0