ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
сейчас доступен на antichat.xyz.
 |
|
08.07.2007, 00:36
|
|
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032
Репутация:
8
|
|
Сообщение от Попрошайка
какой смысл обрабатывать сообщения по развёртыванию формы[/url]
Проста так задумано.
|
|
|
08.07.2007, 00:40
|
|
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032
Репутация:
8
|
|
Чет я не догнал =), можно на пальцах?
|
|
|
|
08.07.2007, 01:05
|
|
Новичок
Регистрация: 14.06.2007
Сообщений: 25
Провел на форуме:
88174
Репутация:
6
|
|
Сообщение от infernal-team
Чет я не догнал =), можно на пальцах?
Ты про последнее изменение? Если да, то у формы не будет кнопок и её нельзя будет переместить, и изменить размер.
|
|
|
|
08.07.2007, 12:48
|
|
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032
Репутация:
8
|
|
То что мне нужно не получилась, может ещё какнибудь можно?!
|
|
|
|
08.07.2007, 13:04
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от infernal-team
Что нужно:
1. Сделать на форме ссылку
2. Сделать нефункционирующими и прозрачными кнопки свернуть и развернуть
3. Сделать переход на другую форму через бутон
Пока на этом все.
1. Используй TLabel. т.е.
а) в сво-ве font выставляешь - Color = Blue;
б) изменяешь курсор на finger - че-то там... ))) не помню... поищи...
б) по событию OnMouseMove
Label1.Font.Style:=Label1.Font.Style+[fsUnderline];
в) по событию OnMouseLeave
Label1.Font.Style:=Label1.Font.Style-[fsUnderline];
2. ответили
3. событие OnClick у Button'a;
Form2.Show
(в секцию uses необходимо добавить модуль связанный с формой)
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
08.07.2007, 13:14
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от a1ex
Дай плиз ссылку,и про прогу я спрашивал на делфи.
http://www.google.ru/search?hl=ru&q=%22Aphex+rootkit%22&btnG=%D0%9F%D0% BE%D0%B8%D1%81%D0%BA+%D0%B2+Google&lr=
не найдешь... дай знать... я тебе поищу...
а вообще помниться в том году качал 80 метров х-стаффа... такого рода по мойму называется
Delphi Developer Kit 2006 что-то там типа того...
потом если потребуется выложу нормальное название...
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
08.07.2007, 13:36
|
|
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032
Репутация:
8
|
|
Вот насчет второго планы изменились нужно удалить свернуть и развернуть. Как это сделать?
|
|
|
|
08.07.2007, 13:59
|
|
Постоянный
Регистрация: 08.05.2006
Сообщений: 816
Провел на форуме:
1845671
Репутация:
1338
|
|
infernal-team
Два пути:
1) В настройках формы, раскрывай BorderIcons и видешь
biSystemMenu - наличие системного меню (слева у значка)
biMinimize - свернуть
biMaximize - развернуть
biHelp - помощь
Тебе нужно будет поставить все параметре в FALSE (Можешь biSystemMenu оставить TRUE)
2) Написать код
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.BorderIcons := [biSystemMenu];
end;
|
|
|
|
08.07.2007, 15:21
|
|
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032
Репутация:
8
|
|
xqwerx пасиб, еще нужно сделать так чтобы окно не раздвигалось.
|
|
|
|
08.07.2007, 16:04
|
|
Постоянный
Регистрация: 08.05.2006
Сообщений: 816
Провел на форуме:
1845671
Репутация:
1338
|
|
Чтобы не раздвигалось в опциях формы у BorderStyle смени bsSizeable на bsSingle ....
P.S. Спасибом бей по репе...
|
|
|
|
|
|
|
|
Здесь присутствуют: 4 (пользователей: 0 , гостей: 4)
|
|
|
|
Похожие темы
Линейный вид
