Вопрос № 110235: Как в Delphi7 у приложения убрать кнопку на панели задач....Вопрос № 110242: Добрый день! Как при нажатии на кнопку (левой кнопкой) вывести над ней PopupMenu? Чтобы независимо от курсора это меню находилось ровно над кнопкой.
Спасибо!...Вопрос № 110251: Здравстуйте, уважаемые эксперты!
Имеется две иконки.
Var ic1,ic2:TIcon;s:string;
В первой УЖЕ загружена картинка. Необходимо каким-то образом сохранить содержимое первой иконки в строку s, и загрузить из строки во вторую иконку...
Вопрос № 110.235
Как в Delphi7 у приложения убрать кнопку на панели задач.
Отправлен: 20.11.2007, 09:26
Вопрос задал: Максим (статус: Посетитель)
Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Dragon
Здравствуйте, Максим!
procedure TForm1.FormActivate(Sender: TObject);
begin
ShowWindow(Application.Handle, sw_Hide);
end;
Ответ отправил: Dragon (статус: 3-ий класс)
Ответ отправлен: 20.11.2007, 09:42 Оценка за ответ: 5
Отвечает: Gh0stik
Здравствуйте, Максим!
Достаточно дописать соответствующую команду в обработчик OnPaint(): procedure TForm1.FormPaint(Sender: TObject); begin
ShowWindow(Application.Handle, SW_HIDE); end;
Good Luck!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессор) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 20.11.2007, 09:50 Оценка за ответ: 5
Отвечает: Стома С.С. !!! Здравствуйте, Максим!
ShowWindow(Application.Handle, SW_HIDE);
Ответ отправил: Стома С.С. (статус: 2-ой класс)
Ответ отправлен: 20.11.2007, 17:33
Вопрос № 110.242
Добрый день! Как при нажатии на кнопку (левой кнопкой) вывести над ней PopupMenu? Чтобы независимо от курсора это меню находилось ровно над кнопкой.
Спасибо!
Отправлен: 20.11.2007, 09:57
Вопрос задал: Red Spirit (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Dragon
Здравствуйте, Red Spirit!
procedure TForm1.Button1Click(Sender: TObject);
begin
PopupMenu1.Popup(Mouse.CursorPos.X,Mouse.CursorPos.Y);
end;
Ответ отправил: Dragon (статус: 3-ий класс)
Ответ отправлен: 20.11.2007, 10:07 Оценка за ответ: 4
Отвечает: Degtyarev Anton
Здравствуйте, Red Spirit!
воспользуйтесь командой
PopupMenu1.Popup
при нажатии на кнопку я задал такие параметры
((button1.Left+form1.Left+(button1.Width div 4)),(form1.Top+Button1.Top-button1.Height));
меню всплывает над кнопкой.
--------- Сколько волка не корми, а слон всё равно толще
Ответ отправил: Degtyarev Anton (статус: 2-ой класс)
Ответ отправлен: 20.11.2007, 10:23 Оценка за ответ: 5
Вопрос № 110.251
Здравстуйте, уважаемые эксперты!
Имеется две иконки.
Var ic1,ic2:TIcon;s:string;
В первой УЖЕ загружена картинка. Необходимо каким-то образом сохранить содержимое первой иконки в строку s, и загрузить из строки во вторую иконку! Как это сделать? (Хочу переслать иконку по UDP протоколу). Пожалуйста, помогите, плиз!!!
Отвечает: Mishell
Здравствуйте, Александр Леонидович!
странно конечно картинку загружать в строку, но ладно...
Вам сначала надо вытащить из иконки два битмапа (изображение и маска)
пример можете посмотреть тут:
http://delphiworld.narod.ru/base/ico_to_glyph.html
потом преобразовать кажды пиксел битмапов в строку, так же не забудьте запоминать формат битмапов (высота ширина)
теперь можете передавать строку
после этого из полученной строки составляете битмапы преобразовывая строки в цвета пикселов
(надеюсь с пробразованием цвет-строка-цвет Вы разберетесь)
теперь надо только создать иконку из изображения и маски - вот так:
http://delphiworld.narod.ru/base/bmp_to_ico.html
Ответ отправил: Mishell (статус: 7-ой класс)
Ответ отправлен: 20.11.2007, 11:09 Оценка за ответ: 4 Комментарий оценки: Совет хороший, но не думаю что он рациональный. Спасибо.
Отвечает: Примак Руслан Николаевич
Здравствуйте, Александр Леонидович!
Сохранить иконку в строку Вы можете через поток.
Смотри пример ниже. Здесь Иконка основной формы сохраняется в файл на диске, через строкковый поток. Доступ к строке потока Вы можете осуществить через: BufString.DataString.
Возможно, Вам не требуется использование String? Ведь, если Вы можете загрузить иконку в поток, этот поток Вы можете использовать для передачи по сокету, наряду с методом передачи строки существует метод передачи буфера (т.е. данных потока).
Приложение:
Ответ отправил: Примак Руслан Николаевич (статус: 4-ый класс)
Ответ отправлен: 20.11.2007, 12:44 Оценка за ответ: 5 Комментарий оценки: Огромное спасибо, то что нужно. з.ы. я использую IdUdpClient, и, к сожалению, там нет возможности отправлять TSream.
