Вопросы по Delphi 2 - [72] :: Прикладное программирование :: Компьютерный форум Ru.Board

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

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?

Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi 2

Модерирует : ShIvADeSt
ShIvADeSt (22-03-2007 02:18): http://forum.ru-board.com/topic.cgi?forum=33&topic=8142	Версия для печати • Подписаться • Добавить в закладки
Страницы: 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

ShIvADeSt

Moderator

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

Продолжение темы http://forum.ru-board.com/topic.cgi?forum=33&topic=3647&start=2020#lt
Внимание, все большие куски кода (более 5 строк) оформляем в тег [more] дабы уменьшить размер поста.

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 01:52 20-04-2006 | Исправлено: ShIvADeSt, 02:02 30-06-2006

Eniq

Newbie

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

Приветствую!!!
Вопрос может показаться вам очень простым, но он поставил меня в тупик.
Самое главное мне правильно его изложить.
Есть "Редактор" (StringGrid), у него есть ScrollBar.
Теперь суть, прокрутка идет следующим образом: я щелкаю на строке StringGrid'а и начинаю крутить колесико мышки, происходит следующее: выделение строки прокручивается, допустим, вниз и дойдя до предела видимой области StringGrid начинает прокручивать ScrollBar.
А хотелось по другому: я щелкаю на StringGrid и прокручивая колесико мышки прокручиваz сразу ScrollBar.
Заранее спасибо.

Всего записей: 1 | Зарегистр. 06-11-2006 | Отправлено: 16:49 06-11-2006

Jokerjar

BANNED

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

Eniq

Код:

procedure TForm1.StringGrid1MouseWheelDown(Sender: TObject;
Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
begin
StringGrid1.Perform(WM_VScroll, SB_LINEDOWN, 0);
end;

procedure TForm1.StringGrid1MouseWheelUp(Sender: TObject;
Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
begin
StringGrid1.Perform(WM_VScroll, SB_LINEUP, 0);
end;

Надеюсь, это то, что надо

Всего записей: 591 | Зарегистр. 22-03-2006 | Отправлено: 17:27 06-11-2006

Jokerjar BANNED	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Как сделать, чтобы Делфи при компиляции не создавала бэкап исходников (с символом ~ в расширении)?
	Всего записей: 591 \| Зарегистр. 22-03-2006 \| Отправлено: 12:17 07-11-2006

relictus

Silver Member

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

Не нашел топика по BDS 2006, посему вопрошаю тут:
недавно поставил сию среду (только Delphi) и в один "прекрасный" день почему-то перестал работать Enter при завершении кода (Code Completition), хотя мышкой все выбирается прекрасно. Что случилось, как победить - может кто знает?

Всего записей: 3715 | Зарегистр. 19-04-2005 | Отправлено: 14:07 07-11-2006

OdesitVadim

Advanced Member

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

relictus
Скорее всего слетела раскладка гарячих клавиш. Править - Tools -> Option
Пункт Editor Options
ищем комбобокс с именем Editor SpeedSetting. Переключаемся на какую-либо раскладку, сохраняемся. Потом ещё раз переключаемся на Default.
Обычно это спасает от разных проблем с "клавиатурой"

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

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 14:18 07-11-2006

RomanTim Member	Редактировать \| Профиль \| Сообщение \| ICQ \| Цитировать \| Сообщить модератору Jokerjar Tools \ Options \ EditorOptions \ Create backup files
	Всего записей: 375 \| Зарегистр. 11-09-2003 \| Отправлено: 14:42 07-11-2006

Figaro2000 Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Jokerjar как вариант - поставить GExperts и просто чистить эти бэкапы с ~
	Всего записей: 245 \| Зарегистр. 24-09-2005 \| Отправлено: 16:07 07-11-2006

KRS545 Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Zergboy Можно в Оутлуке такую вещь сделать, или cxSheduler взять у того же DevExpress'а http://www.devexpress.com/Products/VCL/ExScheduler/ там кстати демка есть хорошая
	Всего записей: 91 \| Зарегистр. 12-06-2005 \| Отправлено: 17:49 07-11-2006

relictus Silver Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору OdesitVadim Уж не знаю как смогла слететь раскладка, но твой совет помог. Спасибо!
	Всего записей: 3715 \| Зарегистр. 19-04-2005 \| Отправлено: 08:09 08-11-2006

rs

Advanced Member

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

нужна компонента для отображения тсруктуры каталогов диска

в принципе есть TDirectoryListBox, но в ней не устраивает то, что если к примеру, каталог первого уровня содержит три подкаталога второго уровня, то при открытии одного из этих трёх каталогов остальные два каталога второго уровня исчезают и становятся видимыми при открытии опять только каталога первого уровня

хотелось бы, чтобы открытие одного каталога второго уровня не скрывало остальные каталоги второго же уровня

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

Всего записей: 1344 | Зарегистр. 19-04-2003 | Отправлено: 10:30 10-11-2006 | Исправлено: rs, 10:31 10-11-2006

OdesitVadim

Advanced Member

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

rs
В делфи вообщето есть такое дело, называется ShellTreeView (кажеться). в 7 и старше.
Но кто мешает написать свой? Там писать на пол часа

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

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 11:24 10-11-2006

TOPEugeni

Junior Member

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

Подскажите страждущему:
Есть такой кусок, где Table1 это файл DBF .

Table1.First;
while not Table1.Eof do
begin
Table1.Delete;
end;

После данной манипуляции, данный файл - как бы очищается, т.е. если его открыть в Excel - нормально, а если в любом DBF Viewer, то видно, что все ранее удаленные выше указаным способом записи оказались ЛИШЬ ПОМЕЧЕННЫМИ на удаление.

Подскажите в чем суть моего непонимания момента. И как (в двух словах) это разрешить

Всего записей: 95 | Зарегистр. 19-05-2006 | Отправлено: 12:21 10-11-2006

megarom

Full Member

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

Привет всем.
нет ли у кого нибудь русского хелпа к делфям 6 и 7?
Все почти перерыл, или деньги хотят или к 5 или лажа...
Мне нужно чтобы как родной работал по F1.

Всего записей: 454 | Зарегистр. 18-07-2006 | Отправлено: 12:23 10-11-2006

OdesitVadim

Advanced Member

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

megarom
Варёз здесь не обсуждается.

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

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 12:36 10-11-2006

megarom

Full Member

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

OdesitVadim

Цитата:

Варёз здесь не обсуждается.

А причем тут варез?
У меня лично и по англицки нормально, а вот другу детей учить надо, он учитель.
Прочитай внимательно вопрос, прежде чем флудить.
И если ты такой грамотный подскажи мне ЛИЧНО, можно как организоватьв памяти некий многомерный массив, и обращаться к нему в разрезе определенной аналитики.

Всего записей: 454 | Зарегистр. 18-07-2006 | Отправлено: 13:01 10-11-2006

rs

Advanced Member

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

Цитата:

OdesitVadim

спасибо, нашёл демо с использованием TShellTreeView и TShellListView

но в хелпе про эти компоненты ни слова, по исходникам тоже не понял, как мне назначив к примеру в качестве 'c:\' Root для TShellTreeView, программно перейти в отображаемом дереве с корнем в 'c:\' к узлу (каталогу) 'c:\temp\1'?

в TDirectoryListBox для этого есть Directory...

как программно селектировать файл по имени в TShellListView?

как программно просмотреть все узлы поддерева?

Всего записей: 1344 | Зарегистр. 19-04-2003 | Отправлено: 13:03 10-11-2006

relictus Silver Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору megarom Может это? http://forum.ru-board.com/topic.cgi?forum=35&topic=21284&start=80#lt
	Всего записей: 3715 \| Зарегистр. 19-04-2005 \| Отправлено: 13:09 10-11-2006

SERGE_BLIZNUK

Silver Member

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

megarom

Цитата:

И если ты такой грамотный подскажи мне ЛИЧНО, можно как организоватьв памяти некий многомерный массив, и обращаться к нему в разрезе определенной аналитики.

я не такой грамотный, но, если я вас правильно понял, посмотрите в сторону таблиц в памяти:
SQLMemTable (смотри http://www.aidaim.com)
TClientDataSet
JvMemoryData (из JEDI)

TOPEugeni
нужно произвести т.н. "упаковку" данных. Для этого ОБЯЗАТЕЛЬНО открыть таблицу в монопольном режиме. Пример из DelphiWorld (рекомендую все новичкам и не только) Подробнее...

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 13:16 10-11-2006

relictus

Silver Member

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

TOPEugeni
Следующие операторы очищают ту же таблицу, удаляя из нее все записи.
Таблица должна быть открыта в эксклюзиве, т.е. Exclusive := True.
Вызов метода Pack не нужен.

with Table1 do
begin

{ таблица переводится в неактивное состояние }

Active := False;

{ удаление всех записей}

EmptyTable;

end;

Всего записей: 3715 | Зарегистр. 19-04-2005 | Отправлено: 13:23 10-11-2006 | Исправлено: relictus, 13:27 10-11-2006

megarom Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору relictus Спасибо
	Всего записей: 454 \| Зарегистр. 18-07-2006 \| Отправлено: 13:51 10-11-2006

Страницы: 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

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi 2
ShIvADeSt (22-03-2007 02:18): http://forum.ru-board.com/topic.cgi?forum=33&topic=8142

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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC