|
@@ -909,7 +909,7 @@ begin
|
|
|
if Assigned(OnDataObjectRelease) then OnDataObjectRelease(Self);
|
|
if Assigned(OnDataObjectRelease) then OnDataObjectRelease(Self);
|
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
-function TDragDropFilesEx.CreateDataObject:TDataObject;
|
|
|
|
|
|
|
+function TDragDropFilesEx.CreateDataObject: TDataObject;
|
|
|
var
|
|
var
|
|
|
DataObject: TDataObjectFilesEx;
|
|
DataObject: TDataObjectFilesEx;
|
|
|
RFName, RPidl: Boolean;
|
|
RFName, RPidl: Boolean;
|