validazione prima del post

[tiberi72]

Allego tutto il progetto.

Con il cancel funziona, ma le cose che ho gia' scritto sugli altri campi le perdo

inoltre se eseguo il cancel il dbnavigator esce dalla modalita' di edit

[Stilgar]

Allora....la richiesta si evolve

Codice: [Seleziona]

procedure TForm1.RacesBeforePost(DataSet: TDataSet);
var
  tempValue : array of String;

begin
  SetLength(tempValue,3);
  tempValue[0] := edtRaceName.field.AsString;
  tempValue[1] := edtRaceMiddleAge.field.AsString;
  tempValue[2] := edtSizeSelector.field.AsString;

  if edtRaceName.Text = '' then
  begin
    DataSet.Cancel;
    DataSet.Insert;             
    edtRaceName.field.AsString := tempValue[0];
    edtRaceMiddleAge.field.AsString := tempValue[1];
    edtSizeSelector.field.AsString := tempValue[2];
    edtRaceName.SetFocus;
  end;
  SetLength(tempValue,0);
end;  

[tiberi72]

grazie mille!!! faro' qualche prova poi ti faccio sapere

[Stilgar]

Di nulla.