Skip to content

Commit 37add0f

Browse files
committed
fix: random crash in dodgy typecast TEdit/TEditButton
1 parent b739799 commit 37add0f

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

source/connections.pas

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1213,7 +1213,7 @@ procedure Tconnform.ListSessionsStructureChange(Sender: TBaseVirtualTree;
12131213

12141214
procedure Tconnform.editHostChange(Sender: TObject);
12151215
begin
1216-
editSSHhost.TextHint := TEdit(Sender).Text;
1216+
editSSHhost.TextHint := editHost.Text;
12171217
Modification(Sender);
12181218
end;
12191219

0 commit comments

Comments
 (0)