como usar una funcion

[MOCOSO07]

hola buen dia lo que pasa es que no se como mandar llamar una funcion ejemplo:
tengo mi funcion pero no se como mandarle los parametros para que se ejecute y como usarla despues de que ya tiene parametros

esto es lo que estoy tratando de hacer

Código Delphi [-]
function filtrado(plan : string; area : String):boolean;
begin
frm_DataModule.qry_revyEqui.close;
  frm_DataModule.qry_revyEqui.SQL.Clear;
  frm_DataModule.qry_revyEqui.SQL.Add('SELECT * FROM ALUMNO');
  frm_DataModule.qry_revyEqui.SQL.Add('WHERE ALUMNO.PLAN_ESTUDIOS = '+QuotedStr(plan)+' AND ALUMNO.AREA_ACADEMICA = '+ QuotedStr(area) + '');
  frm_DataModule.qry_revyEqui.Open;
  frm_DataModule.qry_revyEqui.FetchAll;
end;

mi idea es que me jale el valor de mi variable plan y area en el evento onchangue

Código Delphi [-]
if (Sender is TComboBox) then
begin
  plan := TComboBox(sender).Text;
end;

y que el resultado de mi funcion me lo muestre en dbgrid

gracias de antemano espero y que me haya sabido explicar

[[coso]]

hola,

creo que con

Código Delphi [-]
filtrado(plan,area);

te deberia servir.

saludos

[MOCOSO07]

gracias!!

problema resuelto coso!!

[MOCOSO07]

Amigos mi funcion ya quedo terminada y funciona solo que estoy usando sender para el envio de parametros a mi funcion y en un combobox si funciona

Código Delphi [-]
if (Sender is TComboBox) then
begin
  grupo := TComboBox(sender).Text;
end;

pero cuando uso un componente que instale(rx) DBLookupComboBox ya no me envia nada lo intente con las siguientes propiedades .text y .keyvalue pero no me manda nada no saben por que?

Código Delphi [-]
if (Sender is TDBLookupCombobox) then
begin
  area := TDBLookupComboBox(sender).keyValue;
end;

estoy usando delphi 5

muchas gracias por su atencion