Cita:
Empezado por MartinS
Si, eso queremos, los resultados... ... y si no sale!?, volveremos
Saludos.-
|
esta resuelto, gracias martinS, hice una prueba y funciono con tu logica, ahora lo que voy hacer es cargar las materias ya grabadas al listbox....comparto el codigo que verifica si la materia esta registrada y si no esta la graba... para lo que dijiste sobre si eliminan una materia o cambian el nombre de una,, creare unos controles para eso.. no se si utilizar triggers pero ya ver lo que hare.. de todos modos gracias..... comparto el codigo:
Código Delphi
[-]procedure TForm1.Button3Click(Sender: TObject);
var x:integer;
begin
with dmdatos do
begin
for x := 0 to Listbox2.Count - 1 do
if not atmaterias.Locate('descripcion',listbox2.Items.Strings[x],[]) then
begin
ATMATERIAS.Append;
ATMATERIASMATERIAID.AsString:=edit1.Text;
ATMATERIASDESCRIPCION.AsString:=listbox2.Items[x];
atmaterias.Post;
end;
end;
end;