mirror of
https://github.com/HeidiSQL/HeidiSQL.git
synced 2025-08-26 03:01:07 +08:00
Update VirtualTrees component code to release v7.6.6 from Jan 12 2024
This commit is contained in:
@ -4,7 +4,8 @@ interface
|
||||
|
||||
uses
|
||||
System.Classes,
|
||||
VirtualTrees;
|
||||
VirtualTrees.Types,
|
||||
VirtualTrees.BaseTree;
|
||||
|
||||
type
|
||||
// internal worker thread
|
||||
@ -48,6 +49,7 @@ type
|
||||
|
||||
var
|
||||
WorkerThread: TWorkerThread = nil;
|
||||
|
||||
//----------------- TWorkerThread --------------------------------------------------------------------------------------
|
||||
|
||||
class procedure TWorkerThread.EnsureCreated();
|
||||
@ -57,6 +59,8 @@ begin
|
||||
WorkerThread := TWorkerThread.Create();
|
||||
end;
|
||||
|
||||
//----------------------------------------------------------------------------------------------------------------------
|
||||
|
||||
class procedure TWorkerThread.Dispose(CanBlock: Boolean);
|
||||
var
|
||||
LRef: TThread;
|
||||
@ -70,6 +74,7 @@ begin
|
||||
LRef.Free;
|
||||
end;
|
||||
|
||||
//----------------------------------------------------------------------------------------------------------------------
|
||||
|
||||
class procedure TWorkerThread.AddThreadReference;
|
||||
begin
|
||||
|
Reference in New Issue
Block a user