powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
16 сообщений из 16, страница 1 из 1
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603387
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброе время суток,

Есть форма (Delphi), на ней расположена « TTabSheet » на которой вместе с другими компонентами находились 4 « TEdit ».
Форма немного преобразовалась: на форму кинулся « TGroupBox » и на него переместились (" Cut -> Paste ") эти 4 « TEdit » (« edGPU0 », « edTemp0 », « edGPU1 », « edTemp1 ») и еще некоторые компоненты.
И получилось так, что при выполнении доступа к ним (во время выполнения программы), например, самых простых:
Код: pascal
1.
edGPU0.Clear 


или
Код: pascal
1.
edGPU1.Clear;


у меня выкидывается ошибка:

… raised exception class $C0000005 with message 'access violation at 0x005611f8: read of address 0x00000050'.

С другими компонентами « edit » такого не наблюдается.

Текст dfm представлен ниже
object FMain: TFMain
Left = 413
Top = 337
Caption = 'Control miner'
ClientHeight = 250
ClientWidth = 436
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poDesigned
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object pcControlMiner: TPageControl
Left = 0
Top = 0
Width = 436
Height = 250
ActivePage = tshSetParameters
Align = alClient
TabOrder = 0
object tshSetParameters: TTabSheet
Caption = 'Set parameters'
object lIntervalControl: TLabel
Left = 3
Top = 8
Width = 109
Height = 26
Caption = 'Interval control update log-file && his read'
WordWrap = True
end
object lIntervalCompare: TLabel
Left = 3
Top = 35
Width = 73
Height = 26
Caption = 'Interval control parameters'
WordWrap = True
end
object lWork: TLabel
Left = 88
Top = 64
Width = 106
Height = 26
Caption = 'Check SOUND, click button "Check sound"'
Color = clRed
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = False
WordWrap = True
end
object lUnitIntervalLog: TLabel
Left = 174
Top = 16
Width = 26
Height = 13
Caption = '(sec.)'
end
object lUnitIntervalParameters: TLabel
Left = 173
Top = 43
Width = 26
Height = 13
Caption = '(sec.)'
end
object lValueStatus: TLabel
Left = 211
Top = 151
Width = 57
Height = 13
Caption = 'ValueStatus'
end
object lStatus: TLabel
Left = 174
Top = 151
Width = 33
Height = 13
Caption = 'Status:'
end
object lMinerRun: TLabel
Left = 174
Top = 170
Width = 62
Height = 13
Caption = 'Miner not run'
Color = clRed
ParentColor = False
Transparent = False
end
object Label1: TLabel
Left = 225
Top = 206
Width = 32
Height = 13
Caption = 'Label1'
end
object edIntervalControl: TEdit
Left = 118
Top = 13
Width = 33
Height = 21
Hint = #1063#1077#1088#1077#1079' '#1091#1082#1072#1079#1072#1085#1085#1086#1077' '#1079#1085#1072#1095#1077#1085#1080#1077' '#1087#1088#1086#1074#1077#1088#1103#1077#1090' '#1086#1073#1085#1086#1074#1083#1077#1085#1080#1077' '#1083#1086#1075' '#1092#1072#1081#1083#1072
ParentShowHint = False
ShowHint = True
TabOrder = 0
Text = '5'
OnChange = edIntervalControlChange
OnKeyPress = edIntervalControlKeyPress
end
object upIntervalControl: TUpDown
Left = 151
Top = 13
Width = 16
Height = 21
Associate = edIntervalControl
Min = 5
Max = 10
Position = 5
TabOrder = 1
end
object bCheckSound: TButton
Left = 7
Top = 67
Width = 75
Height = 25
Caption = 'Check sound'
TabOrder = 2
OnClick = bCheckSoundClick
end
object updIntervalCompare: TUpDown
Left = 151
Top = 40
Width = 16
Height = 21
Associate = edIntervalCompare
Min = 5
Max = 180
Position = 11
TabOrder = 3
end
object edIntervalCompare: TEdit
Left = 118
Top = 40
Width = 33
Height = 21
Hint =
#1063#1077#1088#1077#1079' '#1091#1082#1072#1079#1072#1085#1085#1086#1077' '#1079#1085#1072#1095#1077#1085#1080#1077' '#1089#1088#1072#1074#1085#1080#1074#1072#1077#1090' '#1079#1085#1072#1095#1077#1085#1080#1103' '#1089' '#1079#1072#1076#1072#1085#1085#1099#1084#1080' '#1075#1088#1072#1085#1080#1095 +
#1077#1097#1077#1084#1080' '#1079#1085#1072#1095#1077#1085#1080#1103#1084#1080
ParentShowHint = False
ShowHint = True
TabOrder = 4
Text = '11'
OnChange = edIntervalCompareChange
end
object bRestartPC: TButton
Left = 347
Top = 192
Width = 75
Height = 25
Caption = 'Restart PC'
TabOrder = 5
OnClick = bRestartPCClick
end
object gpbControlVolume: TGroupBox
Left = 4
Top = 99
Width = 198
Height = 48
Caption = 'gpbControlVolume'
TabOrder = 7
object pControlVolume: TPanel
Left = 2
Top = 15
Width = 194
Height = 31
Align = alClient
Enabled = False
TabOrder = 0
object lControlFrom: TLabel
Left = 3
Top = 4
Width = 114
Height = 13
Caption = 'From To'
end
object dtpControlFrom: TDateTimePicker
Left = 30
Top = 1
Width = 73
Height = 21
Date = 43119.000000000000000000
Time = 43119.000000000000000000
Kind = dtkTime
TabOrder = 0
end
object dtpControlTo: TDateTimePicker
Left = 119
Top = 1
Width = 73
Height = 21
Date = 43119.291666666660000000
Time = 43119.291666666660000000
Kind = dtkTime
TabOrder = 1
end
end
end
object cbControlVolume: TCheckBox
Left = 9
Top = 96
Width = 129
Height = 17
Hint = 'Descendent volume speak'
Caption = 'Mode descend volume'
TabOrder = 6
OnClick = cbControlVolumeClick
end
object grbLastLogMiner: TGroupBox
Left = 3
Top = 146
Width = 161
Height = 71
Caption = 'Last log miner'
TabOrder = 8
object laFileTime: TLabel
Left = 44
Top = 51
Width = 47
Height = 13
Caption = 'laFileTime'
end
object lTime: TLabel
Left = 4
Top = 51
Width = 23
Height = 13
Caption = 'Time'
end
object lSize: TLabel
Left = 4
Top = 32
Width = 20
Height = 13
Caption = 'Size'
end
object laFileSize: TLabel
Left = 44
Top = 32
Width = 44
Height = 13
Caption = 'laFileSize'
end
object laFileName: TLabel
Left = 44
Top = 13
Width = 52
Height = 13
Caption = 'laFileName'
end
object lName: TLabel
Left = 4
Top = 13
Width = 28
Height = 13
Caption = 'Name'
end
end
object grbOutDataFatm: TGroupBox
Left = 205
Top = 3
Width = 219
Height = 127
Color = clYellow
ParentBackground = False
ParentColor = False
TabOrder = 9
object grbParametersPower: TGroupBox
Left = 3
Top = 5
Width = 110
Height = 118
Caption = 'Parameters (farm out)'
TabOrder = 0
object lGPU0: TLabel
Left = 8
Top = 24
Width = 41
Height = 13
Caption = 'GPU0 '
end
object GPU1: TLabel
Left = 8
Top = 69
Width = 53
Height = 13
Caption = 'GPU1 '
end
object lTemp0: TLabel
Left = 8
Top = 44
Width = 84
Height = 13
Caption = 'temp0 C'
end
object lTemp1: TLabel
Left = 8
Top = 92
Width = 84
Height = 13
Caption = 'temp1 C'
end
object edGPU0: TEdit
Left = 47
Top = 19
Width = 57
Height = 21
Color = clBlack
Ctl3D = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 0
Text = 'edGPU0'
OnChange = edGPU0Change
end
object edGPU1: TEdit
Left = 48
Top = 66
Width = 57
Height = 21
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clLime
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'edGPU1'
OnChange = edGPU1Change
end
object edTemp0: TEdit
Left = 48
Top = 40
Width = 33
Height = 21
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'edTemp0'
OnChange = edTemp0Change
end
object edTemp1: TEdit
Left = 48
Top = 86
Width = 33
Height = 21
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'edTemp0'
OnChange = edTemp1Change
end
end
object grbCompareValue: TGroupBox
Left = 112
Top = 5
Width = 105
Height = 118
Caption = 'Control value'
TabOrder = 1
object l_SignCompareGPU0: TLabel
Left = 3
Top = 24
Width = 8
Height = 13
Caption = '>'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object l_SignCompareTemp0: TLabel
Left = 3
Top = 44
Width = 8
Height = 13
Caption = '<'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object lNameValue2: TLabel
Left = 51
Top = 89
Width = 7
Height = 13
Caption = 'C'
end
object l_SignCompareGPU1: TLabel
Left = 3
Top = 69
Width = 8
Height = 13
Caption = '>'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object l_SignCompareTemp1: TLabel
Left = 3
Top = 89
Width = 8
Height = 13
Caption = '<'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object lNameValue1: TLabel
Left = 69
Top = 68
Width = 27
Height = 13
Caption = 'MH/s'
end
object lNameValue4: TLabel
Left = 51
Top = 44
Width = 7
Height = 13
Caption = 'C'
end
object lNameValue0: TLabel
Left = 69
Top = 24
Width = 27
Height = 13
Caption = 'MH/s'
end
object edNotLess0: TEdit
Left = 14
Top = 21
Width = 49
Height = 21
TabOrder = 0
Text = '31'
end
object edNotLargerTemp0: TEdit
Left = 14
Top = 41
Width = 31
Height = 21
TabOrder = 1
Text = '70'
end
object edNotLess1: TEdit
Left = 14
Top = 66
Width = 49
Height = 21
TabOrder = 2
Text = '31'
end
object edNotLargerTemp1: TEdit
Left = 14
Top = 87
Width = 31
Height = 21
TabOrder = 3
Text = '70'
end
end
end
object Button1: TButton
Left = 312
Top = 152
Width = 75
Height = 25
Caption = 'Button1'
TabOrder = 10
OnClick = Button1Click
end
end
object TabSheet2: TTabSheet
Caption = 'Path'
ImageIndex = 1
object lPathLog: TLabel
Left = 8
Top = 10
Width = 109
Height = 13
Caption = 'Path to the log of miner'
end
object lPathBatFile: TLabel
Left = 8
Top = 56
Width = 96
Height = 13
Caption = 'Path to the "bat" file'
end
object lGPU0Set: TLabel
Left = 8
Top = 121
Width = 29
Height = 13
Caption = 'GPU0'
end
object lGPU1Set: TLabel
Left = 8
Top = 148
Width = 29
Height = 13
Caption = 'GPU1'
end
object edPathLog: TEdit
Left = 0
Top = 24
Width = 386
Height = 21
TabOrder = 0
Text = 'edPathLog'
OnChange = edPathLogChange
end
object edPathBatFile: TEdit
Left = 1
Top = 72
Width = 385
Height = 21
TabOrder = 1
Text = 'edPathBatFile'
OnChange = edPathBatFileChange
end
object bbSave: TBitBtn
Left = 176
Top = 194
Width = 75
Height = 25
Caption = 'Save'
TabOrder = 2
OnClick = bbSaveClick
OnMouseMove = bbSaveMouseMove
end
object bOpenDirectory: TButton
Left = 392
Top = 22
Width = 33
Height = 25
Caption = '...'
TabOrder = 3
OnClick = bOpenDirectoryClick
end
object bOpenFile: TButton
Left = 392
Top = 70
Width = 33
Height = 25
Caption = '...'
TabOrder = 4
OnClick = bOpenFileClick
end
object edGPU0Set: TEdit
Left = 43
Top = 118
Width = 38
Height = 21
TabOrder = 5
Text = 'edGPU0Set'
end
object edGPU1Set: TEdit
Left = 43
Top = 145
Width = 38
Height = 21
TabOrder = 6
Text = 'edGPU1Set'
end
end
object TabSheet1: TTabSheet
Caption = 'Description'
ImageIndex = 2
object lDescription: TLabel
Left = 3
Top = 16
Width = 412
Height = 52
Caption =
#1080#1076#1077#1090' '#1080#1079#1084#1077#1085#1077#1085#1080#1077' '#39'Edit'#39', '#1077#1089#1083#1080' '#1079#1085#1072#1084#1077#1085#1080#1077' '#1084#1077#1085#1100#1096#1077' '#1074#1082#1083#1102#1095#1072#1077#1090#1089#1103' '#1090#1072#1081#1084#1077#1088', '#1080 +
' '#1087#1088#1086#1080#1079#1093#1086#1076#1080#1090' beep #13#10. '#1058#1072#1082#1078#1077' '#1080#1076#1077#1090' '#1080#1085#1082#1088#1077#1084#1077#1085#1090' var '#1085#1072' 1, '#1089' '#1082#1072#1078#1076#1099#1084 +
' '#1089#1083#1077#1076#1091#1102#1097#1080#1084' '#1087#1086#1076#1088#1103#1076' beep, '#1077#1089#1083#1080' '#1086#1085#1085#1077' '#1087#1088#1077#1088#1099#1074#1072#1077#1090#1089#1103'. '#1050' '#1086#1075#1076#1072' '#1087#1088#1077#1088#1099#1074#1072#1077#1090#1089 +
#1103' var=0. '#1045#1089#1083#1080' var= 80, '#1090#1086' '#1087#1077#1088#1077#1079#1072#1075#1088#1091#1079#1082#1072' '#1055#1050
WordWrap = True
end
end
end
object tPollDirectory: TTimer
Enabled = False
OnTimer = tPollDirectoryTimer
Left = 184
Top = 32
end
object tCompareGPU0: TTimer
Enabled = False
Interval = 5000
OnTimer = tCompareGPU0Timer
Left = 347
Top = 19
end
object tCompareTemp0: TTimer
Enabled = False
OnTimer = tCompareTemp0Timer
Left = 392
Top = 48
end
object tCompareGPU1: TTimer
Enabled = False
OnTimer = tCompareGPU1Timer
Left = 323
Top = 67
end
object tCompareTemp1: TTimer
Enabled = False
OnTimer = tCompareTemp1Timer
Left = 384
Top = 96
end
object OpenDialog1: TOpenDialog
Filter = 'bat|*.bat'
Left = 400
end
end

Если во время проектирования, обратиться к тексту dfm View as text »), то также валится ошибка:

Access violation at address 525E0394 in module 'vcldesigner250.bpl'. Read of address 00000000. >> OK Details>>

Кнопка « Details >> » при этом не работает, виснет просто Delphi.

Кто нибудь встречался с такой оказией?
И что при этом делать?
P.S. - У меня есть еще один проект, но там больше компонентов, и опять такая же фигня.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603388
Лись
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Проверь PAS файл, походу часть компонентов не объявлена в исходнике.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603389
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ЛисьПроверь PAS файл, походу часть компонентов не объявлена в исходнике.
Хорошо проверю («edGPU0», «edGPU1»).
Хотя до этого все работало.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603390
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Лись,
Та нет, вроде все объявлено:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
type
  TFMain = class(TForm)
    ...
    edGPU0: TEdit;
    edGPU1: TEdit;
    edTemp0: TEdit;
    edTemp1: TEdit;
    ....
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603447
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Перед вызовом
Sergey-2008
Код: pascal
1.
edGPU0.Clear 

проверьте, проинициализирована ли edGPU0.

Дальше, откройте Вашу dfm из скомпилированного exe каким-нибудь редактором ресурсов и убедитесь, что там именно то, что Вы привели здесь
Sergey-2008Та нет, вроде все объявлено:
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
type
  TFMain = class(TForm)
    ...
    edGPU0: TEdit;
    edGPU1: TEdit;
    edTemp0: TEdit;
    edTemp1: TEdit;
    ....

Я надеюсь, что это в секции published?
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603460
Vizit0r
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
автору меня выкидывается ошибка:

… raised exception class $C0000005 with message 'access violation at 0x005611f8: read of address 0x00000050'.

С другими компонентами «edit» такого не наблюдается.

если она повторяется у тебя - то зачем ты показываешь ошибку АВ, вместо нормального места ошибки из отладчика + коллстека и прочего.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603511
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
_Vasilisk_Перед вызовом
Sergey-2008
Код: pascal
1.
edGPU0.Clear 

проверьте, проинициализирована ли edGPU0.


Перед, этим я проверил на nil , проверка прошла, т.е.
Код: pascal
1.
2.
3.
if edGPU1 = nil then
  showmessage('no exists')
else showmessage('exists');


result = "exists"

_Vasilisk_Дальше, откройте Вашу dfm из скомпилированного exe каким-нибудь редактором ресурсов и убедитесь, что там именно то, что Вы
Вообщем я уже привел текст dfm в первом посте (конечно пользовался блокнотом)

_Vasilisk_Я надеюсь, что это в секции published?
Объявление идет в классе
Код: pascal
1.
2.
3.
type
  TFMain = class(TForm)
   ...


вообщем там где у меня объявлены все визуальные компоненты (повторюсь в компонентами «edTemp0», «edTemp0», такой беды нет, хотя они объявлены там, где и «edGPU0», «edGPU1»).

Может это вообще из-за сборки, "Embarcadero Rad Studio 10.2 Tokyo Architect 25.0.26309.314 x86 [2017, ENG]".
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603520
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Sergey-2008Вообщем я уже привел текст dfm в первом постеЯ не зря сказал_Vasilisk_откройте Вашу dfm из скомпилированного exeВы уверены, что в проект линкуется именно та dfm, которую Вы показали?
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603544
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
_Vasilisk_Вы уверены, что в проект линкуется именно та dfm, которую Вы показали?
- Перепутать не мог, потому что в проекте всего одна dfm.
- Из разряда "не доверяй своим глазам", удалил эту dfm из проекта, при запуске, потребовала dfm

- Может это правда из-за крякнутой версии? (на рутракере подобные проблемы звучали... конечно чуть не тикие как у меня).

P.S.
Сколько не пользовался Delphi7, таких проблем не было.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603561
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Sergey-2008Перепутать не мог,Ладно, Вам виднее
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603582
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
_Vasilisk_Sergey-2008Перепутать не мог,Ладно, Вам виднее
Люди попробовали, засунуть dfm, в Delphi2010 и ХЕ, говорять ошибок не возникало, может действительно сборка такая...
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603597
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ну ЭТО КАКОЙ-ТО ПИПЕЦ товарищи,
кинул dfm, в Delphi7, откомпелировал, проверил - работает...
Эту dfm, кинул обратно в проект Delphi 10.2 - ЗАРАБОТАЛО...

Доуровнял dfm из Delphi7 к dfm Delphi 10.2.
В общем получилось, если в dfm не будет упоминания о обработчиках "edGPU0" и "edGPU1", то все работает.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603599
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так может в этих обработчиках память то и портится ???
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603600
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DimaBrТак может в этих обработчиках память то и портится ???
Вопрос интересный, ща посмотрю...
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603601
Sergey-2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DimaBr,
Не пинайте сильно...
Да, действительно - переименовал компонент (и забыл), а при реализации, обращался к нему по старому имени... и конечно в результате был "nil"

Всем отозвавшимся еще раз СПАСИБО.
...
Рейтинг: 0 / 0
RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
    #39603673
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Sergey-2008и конечно в результате был "nil"Sergey-2008Перед, этим я проверил на nil , проверка прошла
...
Рейтинг: 0 / 0
16 сообщений из 16, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / RadStudio 10.2 Tokyo (небольшие глюки в module vcldesigner250.bpl)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]