Вопросы по Delphi (все версии) - часть 3 - [20] :: Прикладное программирование

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

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

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

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

RomanTim

Member

Figaro2000
Помню что не получалось через Append, а конкретный пример... некогда рыться в своих и уже не свих проектах.

Sampron
VCL потихонечку пухнет, обрастает новыми модулями, классами и функциями

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 14:49 14-06-2007

Sampron

Full Member

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

RomanTim

Цитата:

VCL потихонечку пухнет, обрастает новыми модулями, классами и функциями

Понял Спасибо!
Подскажите как можно сделать форму подвижной при значении BorderStyle bsNone ?

Всего записей: 563 | Зарегистр. 06-01-2007 | Отправлено: 16:53 14-06-2007

gpi

Alone Wanderer

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

Sampron
Советы по Delphi от Валентина Озерова:

Код:

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Perform ( WM_SYSCOMMAND, SC_MOVE+2, 0 );
end;

Всего записей: 432 | Зарегистр. 30-05-2004 | Отправлено: 17:49 14-06-2007

RomanTim

Member

Sampron
Можно еще добавить обработчик сообщения WM_NCHITTEST:
Код:

TForm1 = class(TForm)
private
procedure WMNCHitTest(var Msg: TWMNCHitTest); message WM_NCHITTEST;
...
procedure TForm1.WMNCHitTest(var Msg: TWMNCHitTest);
begin
if (например определение области, за которую можно двигать) then
Msg.Result := HTCAPTION
else
inherited;
end;

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 22:15 14-06-2007 | Исправлено: RomanTim, 22:15 14-06-2007

Sampron Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору gpi RomanTim Спасибо за помощь! но чёто немогу эти коды интегрировать в inno setup на wizardform.
	Всего записей: 563 \| Зарегистр. 06-01-2007 \| Отправлено: 12:23 15-06-2007

GreatOne Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Кто-нить знает как можно заставить StringGrid переносить текст непомещающийся горизонтально в ячейке на другую строку???
	Всего записей: 85 \| Зарегистр. 15-03-2007 \| Отправлено: 13:09 15-06-2007

RomanTim

Member

Sampron
Это наверное лучше уже спрашивать в конференции по InnoSetup

GreatOne
Что ты понимаешь под "другой строкой"? Следующая стока в гриде (т.е. Cells[Col, Row+1]) или многострочный тект в рамках ячейки?

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 14:14 15-06-2007

GreatOne Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору RomanTim Я имею ввиду следующую строку в ячейке.
	Всего записей: 85 \| Зарегистр. 15-03-2007 \| Отправлено: 14:16 15-06-2007

Sampron Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору RomanTim Там уже спрашивал но никто не смог помочь потому обратился сюда, вдруг кто-то юзает инно и сможет помочь.
	Всего записей: 563 \| Зарегистр. 06-01-2007 \| Отправлено: 14:28 15-06-2007

Mandor Sawall Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору GreatOne В общем, надо нарисовать "ручками" (на OnDrawCell) или използувать какой-то заместитель TStringGrid-а, которой поддерживает многострочной текст.
	Всего записей: 119 \| Зарегистр. 20-03-2003 \| Отправлено: 17:03 15-06-2007 \| Исправлено: Mandor Sawall, 17:04 15-06-2007

RomanTim

Member

GreatOne
В обычном TStringGrid штатными средствами похоже никак, так что варианты:
- взять какой-нибудь навороченный грид (тот же TMS, но они как правило платные)
- рисовать содержимое ячеек самостоятельно в OnDrawCell (муторно - так как необходимо учитывать состояния ячейки и соответсвенно ее красить, рисовать рамку фокуса и т.п.)
- сделать своего наследника от TStringGrid, у которого переопределить метод DrawCell таким образом

Всего записей: 375 | Зарегистр. 11-09-2003 | Отправлено: 17:36 15-06-2007

Jokerjar BANNED	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору В системе есть 2 звуковые карты. Как можно программно выбирать карту по-умолчанию?
	Всего записей: 591 \| Зарегистр. 22-03-2006 \| Отправлено: 01:59 18-06-2007

GreatOne Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору RomanTim Спасибо!
	Всего записей: 85 \| Зарегистр. 15-03-2007 \| Отправлено: 11:15 18-06-2007

Erazer

Advanced Member

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

Никто не подскажет локализатора который сохранял бы результаты работы не в виде mainform.caption:=Blah-blah , а как безымянные пронумерованные константы типа 1:=Blah-blah, дабы не раскрывать внутреннюю структуру проги ?

Всего записей: 1731 | Зарегистр. 02-08-2003 | Отправлено: 12:35 18-06-2007 | Исправлено: Erazer, 12:36 18-06-2007

Arvur

Silver Member

Erazer

Цитата:

DKLang делает именно так...

Цитата:

дабы не раскрывать внутреннюю структуру проги ?

...правда в файл языка попадают названия форм.

Всего записей: 2111 | Зарегистр. 18-01-2002 | Отправлено: 14:29 18-06-2007

Jokerjar BANNED	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Насколько я знаю, существует функция, проверяющая, состоит ли строка только из печатабельных символов. Подскажите ее имя
	Всего записей: 591 \| Зарегистр. 22-03-2006 \| Отправлено: 04:38 19-06-2007

Dennica Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Jokerjar Помоему нет такой функции штатной. ИМХО нужно проверять через регэкспы.
	Всего записей: 235 \| Зарегистр. 19-12-2005 \| Отправлено: 09:23 19-06-2007

Erazer

Advanced Member

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

Arvur
Пасиб, но он требует еще дополнительных компонентов для работы с уникодом которые недавно стали платными да и
Цитата:

...правда в файл языка попадают названия форм.

как раз от этого избавиться и хочется....

Всего записей: 1731 | Зарегистр. 02-08-2003 | Отправлено: 14:05 19-06-2007

Arvur

Silver Member

Erazer

Цитата:

требует еще дополнительных компонентов для работы с уникодом которые недавно стали платными

Новая лицензия не распространяется на старые версии TntUnicode - их можно использовать совершенно бесплатно. В теме есть ссылки.

Насчет названий форм:
во-первых, их и так можно получить, просматривая классы запущенного приложения.
во-вторых, искорежить их в языковых файлах до неузнаваемости можно буквально одной строчкой кода.

Всего записей: 2111 | Зарегистр. 18-01-2002 | Отправлено: 15:39 19-06-2007

yuish

Member

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

В каком месте можно отменить брекпоинт? (после переустановки винды и дельфи, в проекте остался старый брекпоинт, его убираешь - закрываешь,открываешь пакет - он опять на месте)

Все, нашел. Контрол+Альт+B - отключил все старые брекпоинты. даже те про которые забыл

Всего записей: 218 | Зарегистр. 10-02-2003 | Отправлено: 10:49 20-06-2007 | Исправлено: yuish, 11:11 20-06-2007

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

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3
ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383

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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC