mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-09 22:48:15 +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;
|
Lines: TObject;
|
||||||
const
|
const
|
||||||
StringProperties: array[0..1] of string = ('Caption', 'Text');
|
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
|
begin
|
||||||
// first check simple string properties
|
// first check simple string properties
|
||||||
for ATextPropertyName in StringProperties do
|
for ATextPropertyName in StringProperties do
|
||||||
|
Loading…
Reference in New Issue
Block a user