se puede enviar un procedimiento como parametro a otro??

[mamcx]

Tambien se puede usar metodos anonimos:

http://docs.embarcadero.com/products...thods_xml.html

Código Delphi [-]
function MakeAdder(y: Integer): TFuncOfInt;
begin
Result := { start anonymous method } function(x: Integer)
  begin
    Result := x + y;
    end; { end anonymous method }
end;

[[Chris]]

Empezado por mamcx

Tambien se puede usar metodos anonimos:

Pero sino me equivoco, estos están solamente disponibles a partir de D2009.

[jasmad]

perdon por la respuesta tardia
gracias por sus respuestas que me han servido de mucho
lo que me parecio muy interezante fue lo del

Synchronize(Method: TThreadMethod)

que menciono Neftali y estoy planeando implementar pero no se donde llamarlo
sera en el execute del thread ?
lo que quiero es implementar una clase thread que envie en un hilo un conjunto de instrucciones y ejecute un dataset.post o dataset.append y veo que el Synchronize puede ayudar a ejecutar el post sin saltarse algun paso que bote la aplicacion como un dataset.commit que se ejecute en el hilo principal sin haber ejecutado el post que esta en el hilo aparte,
no se si me explico

[Neftali [Germán.Estévez]]

Empezado por jasmad

que menciono Neftali y estoy planeando implementar pero no se donde llamarlo
sera en el execute del thread ?

No normal es que esté en el Execute, si.
Piensa que cuando en el thread debes acceder a un elemento/objeto que no pertenece al thread, como por ejemplo los componentes de la VCL que están definidos fuera (la VCL no es Thread-safe) debes hacerlo llamando a este método.

Ten en cuenta que si te pasas el tiempo del Thread lamando a Synchronize, el resultado será como si no utilizaras el thread.

[jasmad]

creo que te entiendo,
si tengo una clase que hereda a tthread tengo que hacer el llamado de synchronize en el execute
algo asi:

Código Delphi [-]
procedure TPublisher.Execute;
begin
   try
      if(Self.tabla.State in dsEditModes)then begin
         Synchronize(@Self.tabla.Post);
      end;
   except
      on e:exception do handleException(e);
   end;
end;

y en una funcion que guarde los cambios del dataset
crear una instancia y llamarlo antes del commit
algo asi:

Código Delphi [-]
procedure TdmConexionDB.aceptarCambiosDataSet(var dataset: TIBCTable);
var
  posteador:TPublisher;
  bm:string;
begin
  activarTransaccion;
  try
  try
    bm:=dataset.Bookmark;
    //la idea es que con el synchronize se ejecute el post antes del commit porque el programa se caeria
    //pero que corra en otro hilo para que no se pegue la aplicacion
    posteador:=TPublisher.Create(dataset);//esta linea ejecuta en un hilo aparte el codigo que se encuentra en el execute de TPublisher
    transacciones.CommitRetaining;
  except
    on e: Exception do
    begin
      transacciones.RollbackRetaining;
      MessageDlg('Error '+e.ToString,'aceptarCambiosDataSet ' + dataset.Name + #13#10 + e.Message,mtError, [mbOK], 0);
    end;
  end;
  finally
     dataset.Bookmark:=bm;
  end;
end;

yo lo entendi asi pero si me equivoco en algo te agradeceria que me corrigieras

gracias