mirror of
https://github.com/HeidiSQL/HeidiSQL.git
synced 2025-08-06 18:24:26 +08:00
Fix two minor compiler warnings.
This commit is contained in:
@ -8103,6 +8103,7 @@ begin
|
||||
avg_persec := '';
|
||||
|
||||
// Detect value type
|
||||
valIsNumber := False;
|
||||
try
|
||||
valIsNumber := IntToStr(MakeInt(val)) = val;
|
||||
except on E:EInvalidOp do
|
||||
|
@ -125,7 +125,6 @@ end;
|
||||
procedure TfrmSelectDBObject.TreeDBOFocusChanged(Sender: TBaseVirtualTree;
|
||||
Node: PVirtualNode; Column: TColumnIndex);
|
||||
var
|
||||
DBObj: PDBObject;
|
||||
Tree: TVirtualStringTree;
|
||||
begin
|
||||
// Overtake node text into lower edit boxes
|
||||
|
Reference in New Issue
Block a user