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

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в 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

   

VitaliM



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Shadi
http://rapidshare.de/files/1166753/demo.rar.html
ссылку на удаление не кладу, как скачаешь сообщи, я сам удалю.

Всего записей: 2204 | Зарегистр. 12-01-2005 | Отправлено: 15:56 07-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
VitaliM
 
Грацио сеньоре!!!
Все гениальное просто!!!
Можно удалять!

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



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Shadi
Я рад, что тебе понравилось. Удачи.
 
Добавлено:
Посмотри по ссылке, может тебе пригодится...
http://forum.ru-board.com/topic.cgi?forum=35&topic=24919&start=340#19

Всего записей: 2204 | Зарегистр. 12-01-2005 | Отправлено: 07:25 08-04-2005
Shadi



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
VitaliM
 
Классная вещь! Еще раз вери сенкс!
Есть еще один вопросик над которым бьюсь и пока нет результата.
 
Суть в том, что когда делаю заставку в цикле, то прогрессбар сильно дергается
Вот фрагмент кода
    FrmSplash := TFrmSplash.Create(self);
    FrmSplash.MaxMt:= Dmod.QryTmp.RecordCount;
    FrmSplash.Show;
    ...
    while not Dmod.QryTmp.Eof do
    begin
        FrmSplash.Update;
        FrmSplash.TekMt :=j;  
        inc(j);
        ...
    end;
 
Может кто сталкивался, подскажите...

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



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Application.ProcessMessage - заставит "ощущать" мишь и клавиатуру. Он в подобных цыклах нужен. прогрессбар дёргается по той причине что при каждом обновлении он пересоздаётся. Выходов два: либо пропускать часть обновлений  (типа если j mod 5=0 then begin FrmSplash.TekMt :=j;FrmSplash.Update;end; - я переставил их) или использовать компонент TGauge.

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

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



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OdesitVadim
 
Спасибо, буду пробовать
О результатах скажу позже...
 
 
Добавлено:

Цитата:
использовать компонент TGauge.

 
Поменял и все пошло! Вот что значит - МАСТЕР!

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



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите пожалуйста учебник (желательно список функций)+(не help) по Delphi.

Всего записей: 67 | Зарегистр. 30-11-2004 | Отправлено: 18:57 08-04-2005
YurikGL



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Вот здесь есть книжки
http://podgoretsky.com/ddp.html

Всего записей: 308 | Зарегистр. 02-09-2004 | Отправлено: 23:52 08-04-2005
V2ad

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
HelL_Doctor Но ты все же постарайся приобрести бумажную книгу по Delphi. Принцип выбора прост - больше страниц, меньше картинок меньше шрифт, я таким образом прикупил в свое время Ч.Калверта по Delphi2, до сих пор пользуюсь, хоть и на семерку перелез

Всего записей: 19 | Зарегистр. 26-01-2004 | Отправлено: 00:44 09-04-2005
Larry Laffer



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Подскажите, как можно навсегда убрать каретку из компоненты TEdit? Я использовал HideCaret(Edit1.Handle);, но она не всегда выручает. :\

Всего записей: 604 | Зарегистр. 09-10-2004 | Отправлено: 14:11 09-04-2005
gar

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Larry Laffer
Навсегда - если перепишешь TEdit, а так можно в Aplication.OnIdl HideCaret вызывать.

Всего записей: 115 | Зарегистр. 16-04-2004 | Отправлено: 15:48 12-04-2005
MrZeRo



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Larry Laffer
Может, через SetWindowLong поменять атрибуты окна? (имеется в виду Edit.Handle)
С параметром GWL_WNDPROC можно подставить свою оконную процедуру, а в ней в обработчике события WM_SETFOCUS  написать HideCaret, чтобы при получении фокуса прятать каретку.

Всего записей: 832 | Зарегистр. 30-01-2002 | Отправлено: 16:45 12-04-2005
Larry Laffer



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
MrZeRo, спасибо, буду пробовать.
 
З.Ы.: А может компонента такая есть, чтобы можно было автоматом прятать каретку?

Всего записей: 604 | Зарегистр. 09-10-2004 | Отправлено: 20:09 12-04-2005
MrZeRo



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Larry Laffer
Не видел таких.

Всего записей: 832 | Зарегистр. 30-01-2002 | Отправлено: 09:32 13-04-2005
Pentium133



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Larry Laffer
Да, конешно есть: TAdvancedCaretHider
)))

Всего записей: 126 | Зарегистр. 21-09-2004 | Отправлено: 11:10 13-04-2005
HelL_Doctor



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Можно ли на делфи сделать загрузочную дискету (полностью с форматированием под загрузчик).  
P.S. Нужно именно из делфи. Очень нужно помогите пожалуйста.

Всего записей: 67 | Зарегистр. 30-11-2004 | Отправлено: 20:05 13-04-2005
VitaliM



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

Цитата:
Да, конешно есть: TAdvancedCaretHider  

И где оно лежит

Всего записей: 2204 | Зарегистр. 12-01-2005 | Отправлено: 20:21 13-04-2005
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Для начала сделай образ какой - нибудь загрузочной дискетки. Вручную (тоесть программно) делать - немеряный геморой. Даже майкрософт так делает. Потом поппробуй открыть дисковод как файл и писать туда. тоесть что-то в виде CreateFile('\\.\A\'......)

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

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 20:22 13-04-2005
HelL_Doctor



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Ну а все таки есть же такие программы которые автоматически создают дискету (они же на чем то писались).

Всего записей: 67 | Зарегистр. 30-11-2004 | Отправлено: 20:26 13-04-2005
ShIvADeSt



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

Цитата:
Ну а все таки есть же такие программы которые автоматически создают дискету (они же на чем то писались).

Ну они не создают дискету, а воссоздают файловую структуру . А работают они примерно сл образом, по секторное считывание данных с дискеты (или еще более мелкие единицы для считывания) запись этих данных в собственную структуру файла, который хранит этот образ. А процесс записи наоборот, считывают данные из файла а пишут на дискету.  

Цитата:
 Потом поппробуй открыть дисковод как файл и писать туда. тоесть что-то в виде CreateFile('\\.\A\'......)

OdesitVadim правильно тебе написал. Хотя можно работать и через DeviceIOControl. (вроде так называется, видел сорцы программы которая позволяла побайтно править данные на винте в любой области раздела в 9х)


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

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:26 14-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