[odrack]

Que tal, Acudo nuevamente a ustedes con este problema, tengo el siguiente codigo:
procedure TForm12.Button1Click(Sender: TObject);
begin
if dbedit1.Text='' then
begin
showmessage('Falta Fecha');
end;
if edit2.Text='' then
begin
showmessage('Falta Cantidad a Traspasar');
end
else
if strtoint(edit2.Text) > strtoint(dbedit6.Text) then
begin
ShowMessage('No puede ser Mayor la cantidad que las existencias')
end
else
begin
form12.Table3.Insert;

Hace la validacion de en dbedit1, si el siguiente campo (edit2) esta vacio manda el mensaje de error pero tambien inserta en un dbgrid los datos de los dbedti1 y edit2. ¿Alguien sabe por que no hace la validacion correctamente? (solo me mande el mensaje y no inserte nada si es que estan vacios los campos)
Saludos