Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi

Модерирует : ShIvADeSt

ShIvADeSt (20-04-2006 01:53): http://forum.ru-board.com/topic.cgi?forum=33&topic=6679#1  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102

   

FAngel



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Larry Laffer
Чтобы ключи не таскали, люди придумали привязку к железу Кому надо, все равно сопрут особенно если права админа имеются, если же нет то проще поиграть с пермишинами NTFS. В случае паука отключаешь юзерам доступ на чтение, паук все равно будет запускатся с правами системы и ключик прочитает. Любой глобальный хук, тем более на копирование или создание файла - лишний тормоз для системы, да и Делфи не лучшая штука для написания таких вещей.

Всего записей: 799 | Зарегистр. 04-12-2003 | Отправлено: 07:44 30-03-2005
Larry Laffer



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Блин... Проще приводы все отрубить..

Всего записей: 604 | Зарегистр. 09-10-2004 | Отправлено: 17:10 30-03-2005
STEEL



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Прислали мне формачку с расширением dcr, я так полагаю, что это delphi component resource. Каким образом её вставить в проект?

Всего записей: 2293 | Зарегистр. 06-01-2002 | Отправлено: 23:52 30-03-2005
FAngel



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
STEEL
Попросить, что бы прислали pas с таким же именем

Всего записей: 799 | Зарегистр. 04-12-2003 | Отправлено: 06:18 31-03-2005
ShIvADeSt



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
STEEL
pas вряд ли пришлют, проси хотя бы dcu под твою версию дельфи, иначе можешь удалить данный файл.

----------
И создал Бог женщину... Существо получилось злобное, но забавное...

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 06:29 31-03-2005
HelL_Doctor



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
У кого-нибудь есть исходник записи на диск, если есть подкиньте пожалуйста.

Всего записей: 67 | Зарегистр. 30-11-2004 | Отправлено: 19:09 31-03-2005
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
HelL_Doctor
http://www.devarchive.com/f1722.html есть портированые на Делфи Nero-API
http://www.torry.net/pages.php?id=249 компоненты по записи дисков. Есть фрии+исходники. Открываеш, читаеш.

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 20:25 31-03-2005
Larry Laffer



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Вопрос: у меня есть stay on top форма. На панели задач не отображается (ShowWindow(Application.Handle, SW_HIDE);). Как мне убрать линк на форму по Alt+Tab?

Всего записей: 604 | Зарегистр. 09-10-2004 | Отправлено: 13:56 03-04-2005
ShIvADeSt



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Как мне убрать линк на форму по Alt+Tab?

напиши в событии OnCreate главной формы
    WnHnd := GetWindowLong(Application.Handle, GWL_EXSTYLE);
    WnHnd := WnHnd or WS_EX_TOOLWINDOW;
    SetWindowLong(Application.Handle, GWL_EXSTYLE, WnHnd);


----------
И создал Бог женщину... Существо получилось злобное, но забавное...

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:06 04-04-2005
YFred



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Люди
Подскажите как писать распределенный проект на Delphi, в смысле,  двоем одну программу. или подскажите где прочитать как это делается.

Всего записей: 211 | Зарегистр. 03-03-2005 | Отправлено: 16:21 04-04-2005
FAngel



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
YFred
Тебе нужно что нибудь типа Borland StarTeam

Всего записей: 799 | Зарегистр. 04-12-2003 | Отправлено: 07:31 05-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вопрос! Как сделать, чтобы заставка грузилась как PL/SQL Developer? Т.е. заставка исчезает только после того, как загрузится главная форма. Буду очень признателен за кусочек рабочего кода!

Всего записей: 110 | Зарегистр. 07-05-2003 | Отправлено: 13:49 06-04-2005
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Создаеш форму для заставки. FormStyle:=bsNone (тоесть чтобы заголовка не было). На неё бросаеш картинку и прочю красоту. Лезишь Project.dpr (Project -> View Source).
Ищещ там строку создания своей формы и сносиш. а дальше переписываеш следующим образом.

Код:
 
  Application.Initialize;
  Screen.Cursor:=crHourGlass;
  FormSplash:=TFormSplash.Create(Application);//это наша заставка
  FormSplash.FormStyle:=fsStayOnTop;
  FormSplash.Show;
  FormSplash.Update;
//Здесь создание остальных форм - начало
  Application.CreateForm(TForm, Form);
 //Здесь создание остальных форм - конец
  FormSplash.Free; //Убираем форму за собой
  screen.Cursor:=crDefault;
  Application.Run;//Запускаем приложения.
 

Замечания. Если с других форм схочеш изменять что-то на этой сплеш-форме, то нужно после этих строк обновлять принудительно её  FormSplash.Update;

----------
Press any key to continue or any other key to exit
Пишите так, чтобы не было стыдно за нобелевскую премию.

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 14:03 06-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OdesitVadim
 
Конечно спасибо за быстрый ответ, но это не то! Суть в том, что окно заставки исчезает и только потом открывается главная форма.
А надо, чтобы заставка "висела" а за ней открывалась бы главная форма и только потом заставка должна исчезнуть!

Всего записей: 110 | Зарегистр. 07-05-2003 | Отправлено: 14:22 06-04-2005
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Shadi
тогда сделаем так. Метод немного извращённый, но он того стоит.
строку  FormSplash.Free; нужно перенести в главную форму следующим образом. Поставим на форму таймер и в него впишем

Код:
 
Timer1.enabled:=false;
 FormSplash.Free;
 

а таймер настраиваем на нужное время. Запускаем таймер в OnCreate главной форме.

----------
Press any key to continue or any other key to exit
Пишите так, чтобы не было стыдно за нобелевскую премию.

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 14:33 06-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OdesitVadim
 
И так не прет! На OnCreate  он не отражает главную форму вообще...

Всего записей: 110 | Зарегистр. 07-05-2003 | Отправлено: 14:39 06-04-2005
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
ТОгда только через потоки. Мутненько будет.
Попробуй после
Цитата:
FormSplash.Free;

вставить Form1.show (свою главную форму)

----------
Press any key to continue or any other key to exit
Пишите так, чтобы не было стыдно за нобелевскую премию.

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 15:02 06-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OdesitVadim
 

Цитата:
ТОгда только через потоки

Да это будет действительно мутненько!
 
Я пробовал на событие оnShow вешать FormSplash.Free; Но нет прорисовки формы, хотя что-то пытается..
Может есть какой способ попроще, чем в потоках?
 

Всего записей: 110 | Зарегистр. 07-05-2003 | Отправлено: 15:29 06-04-2005
VitaliM



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Shadi
Я тут маленький примерчик сделал, попробуй
http://rapidshare.de/files/1153548/demo.rar.html
 
после того как скачаешь, удали, что бы не засорять ресурс
http://rapidshare.de/files/1153548/demo.rar?killcode=382641025

Всего записей: 2204 | Зарегистр. 12-01-2005 | Отправлено: 16:15 06-04-2005 | Исправлено: VitaliM, 16:24 06-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
VitaliM
 
Кинь плиз еще разок, а то кто-то их уже удалил!
 

Цитата:
http://rapidshare.de/files/1153548/demo.rar.html  

File /files/1153548/demo.rar.html has been deleted.
 
 
 
Добавлено:
Сорри, наверное это я впопыхах и удалил
Плиз еще раз выложи или в профильное мыло

Всего записей: 110 | Зарегистр. 07-05-2003 | Отправлено: 07:44 07-04-2005
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi
ShIvADeSt (20-04-2006 01:53): http://forum.ru-board.com/topic.cgi?forum=33&topic=6679#1


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru