[webmasterplc]

Estoy usando la conculta de olbeub solo le agregue algo a lado de los parentesis (max (idorden) as idorden)

Código Delphi [-]
 SQL.Add('MAX(IDORDEN) as idorden');

y ademas ya logue que no me repita registros desde la bases de datos pero cuando lo consigue repetido me da un error y listo me gustaria es que si consigue ese registro repetido linpie la consulta y velva a ejecutarla y luego que no este repetido continue el procedimiento aca coloco un trozo de codigo

Código Delphi [-]
procedure Todespacho.BitBtn1Click(Sender: TObject);
        var
        AccExclusivo:Boolean;
        proximonumero:Integer;
        numero:Integer;
        tord:Real;
        tpart:Real;
        begin
  with Data.sqcaval do
  begin
    Close;
    SQL.Clear;
      SQL.Add('SELECT');
      SQL.Add('MAX(IDORDEN) as idorden');
      SQL.Add(' FROM cartaavaleulalia');
    Open;
    proximonumero := FieldByName('IDORDEN').AsInteger +1;
    numero := 0;
  end;

   begin

       Data.orden.Append;
       Data.mtiva.Append;
       Data.ttrans.Append;
       Data.orden.FieldByname('programa').AsString := programa.LookupValue;
       Data.ejecucion.FieldByname('programa').AsString := programa.LookupValue;
       Data.orden.FieldByname('presupuesto').AsString := presupuesto.LookupValue;
       Data.ejecucion.FieldByname('presupuesto').AsString := presupuesto.LookupValue;