Цитата:
|
Сообщение от Alegun
Да как обычно, рисунки грузятся из ресурса, значит нужно перетянуть к себе файл *.res, отличный по-названию от имени проекта и в *.dpr указать директивой {$R название файла}, а чтоб их поменять на другие, можно пересобрать его содержимое в имидж эдиторе
|
Помогите, пожалуйста, записать следующие две команды с MainMenu1 применительно к ChCBox? Напомню,
что ChCBox: TComboBox, но со вставкой рисунка - виртуальный CheckComboBox (см. по теме выше, стр.1).
Код:
MainMenu1.Items[0].Items[n-1].Checked:=true;
...
MainMenu1.Items[0].Items[n-1].Enabled:=AccessCom(PChar('COM'+Chr(n+$30)));
Как тут:
Код:
for i:=1 to 4 do ChCBox.Items.Objects[i-1]:= nil;
// for i:=1 to 4 do MainMenu1.Items[0].Items[i-1].Checked:=false;
Заранее - спасибо!