asignacion de un valor a un dbedit

[[Lepe]]

Pues yo veo 3 fallos

bienes.DBEditgrupo.DataSource.DataSet.FieldByName(Fbienes.DBEditgrupo.Text).Asstring := '2'


1º - El inicio de la linea no seria: [b]F[/]bienes.DBEditgrupo.....


2º - Justo al final de esa misma linea te falta el punto y coma que te pide.


if (tira > 21) and (tira<49)
Then
** Fbienes.DBEditsub.DataSource.DataSet.FieldByName(Fbienes.DBEditsub.Text).Asstring := '02';
{else
if tira < }
end <------------3º - este end sobra de momento
else
begin
MessageDlg('Debe abrir un nuevo registro antes de insertar los datos',mterror,[mbok],0);
Abort;
end;