ADD: filesource in TFileSourceUIParams

This commit is contained in:
rich2014 2025-01-01 01:57:09 +08:00
commit dc3a68d907
2 changed files with 3 additions and 0 deletions

View file

@ -47,6 +47,8 @@ type
TFileSourceUIParams = record
sender: TObject;
fs: IFileSource;
col: Integer;
row: Integer;
drawingRect: TRect;

View file

@ -2002,6 +2002,7 @@ begin
params:= Default( TFileSourceUIParams );
params.sender:= Self.ColumnsView;
params.fs:= Self.ColumnsView.FileSource;
params.col:= aCol;
params.row:= aRow;
params.displayFile:= aFile;