wwFilterDialog 取得條件
// datafilter.ExecuteDialog(true,Memo1.Lines);
{
View the wwFilterDialog's SQL when using it with a Query.
If you wish to view the SQL that was generated (for Debug or other reasons), then you can put the following code in the OnExecuteSQL event of the TwwFilterDialog to view the actual SQL string that is generated before it is actually executed. (This only applies when using the FilterMethod = fdByQueryModify)
procedure TForm1.wwFilterDialog1ExecuteSQL(Dialog: TwwFilterDlg; Query:TQuery);
var i: integer;
begin
for i := 0 to Query.SQL.Count-1 do
ShowMessage('Line #'+IntToStr(i+1)+': '+Query.SQL.Strings[i]);
end;
}
{
View the wwFilterDialog's SQL when using it with a Query.
If you wish to view the SQL that was generated (for Debug or other reasons), then you can put the following code in the OnExecuteSQL event of the TwwFilterDialog to view the actual SQL string that is generated before it is actually executed. (This only applies when using the FilterMethod = fdByQueryModify)
procedure TForm1.wwFilterDialog1ExecuteSQL(Dialog: TwwFilterDlg; Query:TQuery);
var i: integer;
begin
for i := 0 to Query.SQL.Count-1 do
ShowMessage('Line #'+IntToStr(i+1)+': '+Query.SQL.Strings[i]);
end;
}