No caso e uma tabela de Adress , no caso e 1 Memo 3 botoes
1 Botao para Adicionar
1 Botao para Remover
1 Botao para Editar
Usei 1 Checklistbox1
Used: Array of Array of string;
i : string;
Estou meio com duvida no ultimo botao o de Editar
//Editar
procedure TForm1.BitBtn2Click(Sender: TObject);
begin
for i:=0 to CheckListBox1.Items.Count-1 do
begin
if CheckListBox1.Selected[i] then
begin
if Used[i,3] = '1' then
begin
// Cheguei aqui e parei , não sei como continuar para Editar um determinado lugar da minha CheckList
// são 3 espaços na Check list Valor , Adress , Nome
end;
end;
end;
end;
end;
Pergunta
Silva~
No caso e uma tabela de Adress , no caso e 1 Memo 3 botoes
1 Botao para Adicionar
1 Botao para Remover
1 Botao para Editar
Usei 1 Checklistbox1
Used: Array of Array of string;
i : string;
Estou meio com duvida no ultimo botao o de Editar
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.