Развернуть копию программы из трея

@paxan86 · Регистрация: 18.05.2011

Студворк — интернет-сервис помощи студентам

Нужно чтобы 2ая копию программы разворачивала 1уй копию программы.
Много читал по форумам но так и не нашёл ничего.
Мб что то пропустил если поподалось киньте пожалуйста ссылочку.
Я так понял что программа должна послать сообщение на разворачивание как то так.
средставами sw_show, normal и тд. и тп не получилось так как.при разворачивании проги компоненты не отображаются некоторые.

программа сворачивается через cooltrayicon через процедуру(если это важно)

Заранее спасибо.

@paxan86 · 17.02.2012, 03:14 **[ТС]**

Не по теме:

Вот и всё. Учитель с меня такой, как из тебя балерина, поэтому, вероятно, объяснил не совсем понятно. Для этого прикрепил рабочий пример всего, что описал выше.

Почему не понятно?, вроде пока понятно=) мб и балерина и Учитель..=) За код Большое Спасибо=) вроде комментарии понятные..=) как напишу код поизучаю..=) Отпишусь потом... На новый делфи переходить не хочу,он красивее, но там мне нечего не понятно..) я даже не смог установить компонент(Флеш плеер) в отличие от D7

Добавлено через 2 минуты

Сообщение от Игорь[Igor]

У тебя проблема неотображения компонентов в том что окно формы создается в свернутом виде, исправь это и все будет нормально и с твоим компонентом.

а как если мне программа не нужна в развёрнутом виде?

@Игорь[Igor] · 17.02.2012, 03:14

Я понял

Сообщение от deathNC

;2498071]

deathNC · 17.02.2012, 03:17

Сообщение от paxan86

На новый делфи переходить не хочу,он красивее, но там мне нечего не понятно

Не по теме:

Если надумаешь переходить, то сразу даю совет - переходи на 2009. Я вот перешёл с 2009-й на 2010-ю, и жалею - слишком уж не в ту сторону развивается среда (или я привык к старому). Да и 2009 не очень, начинал с D7, и сейчас заказы на ней пишу, если у заказчиков XPюша

@paxan86 · 17.02.2012, 03:20 **[ТС]**

Сообщение от deathNC

Не по теме:

Если надумаешь переходить, то сразу даю совет - переходи на 2009. Я вот перешёл с 2009-й на 2010-ю, и жалею - слишком уж не в ту сторону развивается среда (или я привык к старому). Да и 2009 не очень, начинал с D7, и сейчас заказы на ней пишу, если у заказчиков XPюша

Не по теме:

Окей =)

Добавлено через 53 секунды

Не по теме:

Насчёт вопросов:
пока 2 не по теме:
Зачем нижнее подчёркивание(_) и собака(@) пока всё =)
На Си наблюдал такой синтаксис почти везде

@Игорь[Igor] · 17.02.2012, 03:21

Сверни ее после создания формы

deathNC · 17.02.2012, 03:25

paxan86, нижнее подчёркивание по привычке - оно никак не влияет, просто имена такие давал.
А собака @ - она даёт указатель на память. Мы передаём в функции указатель на структуру, а не саму структуру. То есть адрес структуры в памяти.

Добавлено через 2 минуты
кстати, зайди в меню (чтобы сделать, что советует Igor)
Project-->View Source
Тебе откроется код программы. Там до строчки Application.Run напиши:

Delphi
1
Application.ShowMainForm := False;

А в главной форме после заполнения структуры напиши вызов процедуры с добавлением значка:

Delphi
1
Shell_NotifyIcon(nim_add, @_tray1);

Тогда оно будет сразу как бы "свёрнутым в трей"

@paxan86 · 17.02.2012, 03:46 **[ТС]**

первая ошибка)
[Error] Unit1.pas(69): Field definition not allowed after methods or properties

Delphi
1
2
private
_tray1: TNotifyIconData;

хотя в готовом примере работает)

deathNC · 17.02.2012, 03:48

paxan86, походу перед этой строкой процедура или функция объявлена. Сначала объявляются все переменные, а потом только методы и свойства.

@paxan86 · 17.02.2012, 03:50 **[ТС]**

Сообщение от deathNC

paxan86, походу перед этой строкой процедура или функция объявлена. Сначала объявляются все переменные, а потом только методы и свойства.

да так и было...) не знал)

@paxan86 · 17.02.2012, 04:00 **[ТС]**

к сожалению тот же эффект...(((
только теперь не при 2ой копии а просто при разворачивании..

Комментарий модератора

Скриншот откорректирован!

@paxan86 · 17.02.2012, 04:04 **[ТС]**

нашёл проблему)

Delphi
1
Application.ShowMainForm := false;

как заменить?

deathNC · 17.02.2012, 04:05

paxan86, пробовал какие-нить Repaint или Refresh применять? Поюзай подобные методы у формы, может поможет...

@paxan86 · 17.02.2012, 04:06 **[ТС]**

пробовал и то и другое ...
помогло только

Delphi
1
Application.ShowMainForm := true;

deathNC · 17.02.2012, 04:06

paxan86, то есть когда нету Application.ShowMainForm := false; тогда всё нормально?

@paxan86 · 17.02.2012, 04:09 **[ТС]**

да, значит и тогда в этом проблема была как и сказал игорь..
не понятно почему так)

deathNC · 17.02.2012, 04:10

Сообщение от paxan86

не понятно почему так)

чёрт знает. Подумаю, скажу, если чего надумаю

@paxan86 · 17.02.2012, 04:15 **[ТС]**

Я давно заметил траблы со сворачиваем...
так как в OnCreate не работает сворачивание...

Добавлено через 4 минуты

Сообщение от deathNC

чёрт знает. Подумаю, скажу, если чего надумаю

Окей, Спасибо большое к вечеру мб что-то и надумаешь, ну или я что-то придумаю...=)

Не по теме:

я пока пойду посплю))) я давно хотел но изучение трея затянуло=) бб)

deathNC · 17.02.2012, 04:22

Сообщение от paxan86

да, значит и тогда в этом проблема была как и сказал игорь..

хм... Игорь на все сто был прав. У меня такая же лажа. Сейчас придумаю, как это исправить

@paxan86 · 17.02.2012, 04:26 **[ТС]**

и ещё кстати с memo почему то такой глюк проскакивает... но я ещё не как не выловлю из за чего... у него свойство Visible или сразу не работает, или работает но потом перестаёт... но я это всё также связываю с треем(сворачиванием), мб щяс такого не будет...)

deathNC · 17.02.2012, 04:30

paxan86, я как-то раньше избавлялся от этого трабла. Вот найти бы, как я справлялся. Самому уже интересно

Но у меня не только из-за ShowMainForm оно так было. Вообще при сворачивании всегда портачило... (когда на D7 писал)

Новые блоги и статьи Все статьи Все блоги /
Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .	Часы с будильником на основе класса QLCDNumber Uhbif79 12.08.2026 Всем добрый день, выкладываю программу часов с будильником на основе класса QLCDNumber. Здесь я пробовал самостоятельно создавал классы, впервые столкнулся с видимостью переменной одного класса из. . .	Установка MinGW GCC 16.2 и CMake 8Observer8 10.08.2026 VK Видео: https:/ / vkvideo. ru/ video-240781534_456239017 YouTube: eY5-5PyI9NM Текстовая версия
Неделя из жизни имитационной модели склада: мои кривые руки растут, откуда надо anaschu 10.08.2026 Неделя из жизни имитационной модели склада: как я почти написал неправильную логику и что с этим делать Работаю сейчас над учебно-рабочим проектом: строю в AnyLogic имитационную модель процессов. . .	Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .

@paxan86 51 / 46 / 8 Регистрация: 18.05.2011 Сообщений: 497

	Развернуть копию программы из трея 16.02.2012, 22:32. Показов 17369. Ответов 82 Метки нет (Все метки) Нужно чтобы 2ая копию программы разворачивала 1уй копию программы. Много читал по форумам но так и не нашёл ничего. Мб что то пропустил если поподалось киньте пожалуйста ссылочку. Я так понял что программа должна послать сообщение на разворачивание как то так. средставами sw_show, normal и тд. и тп не получилось так как.при разворачивании проги компоненты не отображаются некоторые. программа сворачивается через cooltrayicon через процедуру(если это важно) Заранее спасибо. 2

@Игорь[Igor] 726 / 478 / 130 Регистрация: 24.12.2008 Сообщений: 3,924
	17.02.2012, 03:21
	Сверни ее после создания формы 1

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	17.02.2012, 03:48
	paxan86, походу перед этой строкой процедура или функция объявлена. Сначала объявляются все переменные, а потом только методы и свойства. 1

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	17.02.2012, 04:05
	paxan86, пробовал какие-нить Repaint или Refresh применять? Поюзай подобные методы у формы, может поможет... 1

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	17.02.2012, 04:06
	paxan86, то есть когда нету Application.ShowMainForm := false; тогда всё нормально? 1

@paxan86 51 / 46 / 8 Регистрация: 18.05.2011 Сообщений: 497
	17.02.2012, 04:09 [ТС]
	да, значит и тогда в этом проблема была как и сказал игорь.. не понятно почему так) 0

@paxan86 51 / 46 / 8 Регистрация: 18.05.2011 Сообщений: 497
	17.02.2012, 04:26 [ТС]
	и ещё кстати с memo почему то такой глюк проскакивает... но я ещё не как не выловлю из за чего... у него свойство Visible или сразу не работает, или работает но потом перестаёт... но я это всё также связываю с треем(сворачиванием), мб щяс такого не будет...) 0

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	17.02.2012, 04:30
	paxan86, я как-то раньше избавлялся от этого трабла. Вот найти бы, как я справлялся. Самому уже интересно Но у меня не только из-за ShowMainForm оно так было. Вообще при сворачивании всегда портачило... (когда на D7 писал) 0