mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-05 04:27:55 +02:00
Designer: In component rename dialog, get text from 'Script' property for components that have it. Issue #40995, patch by n7800.
This commit is contained in:
parent
52fc791feb
commit
5966a227e8
@ -89,7 +89,7 @@ var
|
||||
Lines: TObject;
|
||||
const
|
||||
StringProperties: array[0..1] of string = ('Caption', 'Text');
|
||||
TStringsProperties: array[0..2] of string = ('Lines', 'Items', 'SQL');
|
||||
TStringsProperties: array[0..3] of string = ('Lines', 'Items', 'SQL', 'Script');
|
||||
begin
|
||||
// first check simple string properties
|
||||
for ATextPropertyName in StringProperties do
|
||||
|
Loading…
Reference in New Issue
Block a user