|
Вопрос # 5 480/ вопрос решён / |
|
Здравствуйте! В прложении есть , допустим 3 окна. Главное окно сворачивается в трэй с помощью компонента CoolTray, а как сворачивать остальные окна в панельзадач, а не в левый нижний угол над панелью задач (как они сворачивоются по умолчанию)? И ещё... чтобы при сворачивании главного остальные не сворачивались?
 |
Вопрос задал: eclipse (статус: Посетитель)
Вопрос отправлен: 4 июля 2011, 16:48
Состояние вопроса: решён, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
У меня это сделано вот так:
procedure TFindInFilesForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
// Сворачивание формы на панель задач
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent := GetDesktopWindow;
end;
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 4 июля 2011, 16:53
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 13; последнее сообщение — 5 июля 2011, 19:02; участников в обсуждении: 4.
|
DNK (статус: Студент), 4 июля 2011, 17:21 [#1]:
Может остальные окна не сворачивать, а скрывать?
Form.Hide
"Digital Networked Knight"
|
|
eclipse (статус: Посетитель), 5 июля 2011, 10:18 [#2]:
DNK не... именно свернуть в панель задач.
|
|
eclipse (статус: Посетитель), 5 июля 2011, 10:29 [#3]:
Возник ещё один вариант - организовать мой проект в двуж файлах exe и сделать "общение" между ними через wm_copydata. Или это будет тормозить их? И, извиняюсь что не в тему, почему в ListView я не могу обработать 7 столбец (vsReport). Т.е. он создаётся, отображается, но сотворить с ним я ничего не могу пишет что listIndex out of bounds. обращаюсь к нему так:
ListView1.items.item[i].subitems.strings[5]:= ''
|
|
min@y™ (статус: Доктор наук), 5 июля 2011, 10:42 [#4]:
Цитата (eclipse):
listIndex out of bounds
А чему i равно?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
Вадим К (статус: Академик), 5 июля 2011, 10:42 [#5]:
что бы обратится к 7 столбцу, нужно что бы он был. То, что есть колонка, еще не значит, что есть элемент.
Цитата (eclipse):
в двуж файлах exe и сделать "общение" между ними через wm_copydata. Или это будет тормозить их?
и да и нет. все зависит от того, что будет и в каких кол-вах передаваться.
Кому то 1 секунда задержки - хорошее время, а кому то 10мс - ужасно долго
Галочка "подтверждения прочтения" - вселенское зло.
|
|
eclipse (статус: Посетитель), 5 июля 2011, 10:49 [#6]:
min@y™ - Вот с i всё нормально. Тут i определяет строку, а 5 столбец. И то и другое существует... ведь вручную в проекте я могу туда внести данные! Но , к стати, в нете встречал что много есть таких же проблем... именно с теми столбцами которые больше 6.
ListView1.items.item[i].subitems.strings[5]:= ''
Вадим К - ну, 10 мс, я думаю, это уж и не такая большая задержка. Можно даже сказать что её нет.
|
|
min@y™ (статус: Доктор наук), 5 июля 2011, 10:54 [#7]:
Цитата (eclipse):
min@y™ - Вот с i всё нормально. Тут i определяет строку, а 5 столбец.
Спасибо, капитан, а то я и не знал!
По делу: пройдись дебаггером и/или понаставь Assert() и Assigned(), чтобы узнать, что у тебя существует, а что равно nil или разрушено.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
eclipse (статус: Посетитель), 5 июля 2011, 11:01 [#8]:
проверял... всё есть, но внести данные программным путём не выходит почемуто?
|
|
min@y™ (статус: Доктор наук), 5 июля 2011, 11:16 [#9]:
Цитата (eclipse):
но внести данные программным путём не выходит почемуто?
Ну код тогда давай посмотрим.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
eclipse (статус: Посетитель), 5 июля 2011, 11:20 [#10]:
Хм... интересно... попробовал сделать так:
with lv1.Items.Add do
begin
Caption:= 'caption';
SubItems.Add('0');
SubItems.Add('1');
SubItems.Add('2');
SubItems.Add('3');
SubItems.Add('4');
SubItems.Add('5');
end;
Всё нормально! А интересно почему так не получается?:
Lv1.items.item[0].subitems.strings[5]:= '5';
Хотя .... а допёрло! нужно сперва её добавить... Так? Типо - SubItems.Add('5'); А уже потом туда присваивать данные, когда нужно.
|
5 июля 2011, 11:23: Статус вопроса изменён на решённый (изменил автор вопроса — eclipse)
|
min@y™ (статус: Доктор наук), 5 июля 2011, 11:41 [#11]:
Цитата (eclipse):
Хотя .... а допёрло! нужно сперва её добавить...
ЭТО ЭПИЧЕСКИЙ ПРОРЫВ!!! УРА, ТОВАРИЩИ!!!
З.Ы. Пошёл в магаз за коньяком... Это событие требуется незамедлительно отпраздновать!
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
min@y™ (статус: Доктор наук), 5 июля 2011, 11:47 [#12]:
Куплю, пожалуй, 0,7 "Арарат" за 800 рублей!
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
eclipse (статус: Посетитель), 5 июля 2011, 19:02 [#13]:
Ну ты блин юморист! Тупанул чуток... с кем не бывает!
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|