Вопросы по Delphi (версии 2009, 2010 Weaver, 2011 Fulcrum) - [54] :: Прикладное программирование :: Компьютерный форум Ru.Board

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

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

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

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (версии 2009, 2010 Weaver, 2011 Fulcrum)

Модерирует : ShIvADeSt
Версия для печати • Подписаться • Добавить в закладки
Страницы: 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 103 104 105 106 107 108 109 110 111

Открыть новую тему

Написать ответ в эту тему

Advanced Member

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

Обсуждаем новые возможности и баги

Просьба писать только про Delphi 2009 и выше - по остальным версиям есть соответствующая тема.

Вопросы вареза здесь не обсуждаются !!!

По вопросам вареза сюда:
RAD Studio 2009 (Tiburon)
RAD Studio 2010 (Weaver)
RAD Studio 2011 (Fulcrum)

См. также:

Вопросы по Delphi (до версии 2009)

Вопросы по компонентам для Delphi, C++ Builder / Использование DevExpress

Компоненты и утилиты для Delphi/BCB/FreePascal/Lazarus - только Open Source

Голосование "Нужен ли топик по Open Source-компонентам для Delphi ?"

Известные важные баги Delphi 2010:

Описание________________________________________________	Исправлено	Решение/Альтернатива_____________________
1. Внимание ! Деинсталляция D2010 нарушает работу D2007 и D2009 ! При деинсталляции удаляются CC3280MT.DLL и CC3290MT.DLL из Windows\System32, необходимые для работы D2007 и D2009 соответственно.		Сделайте резервные копии
2. Code Formatter не работает, если не инсталлирован пакет моделирования. В нем также присутствует множество багов. Используйте с осторожностью.		1. JEDI CodeFormat 2.44 SVN Snapshot (~750Kb) Требуются JCL и JVCL 2.GExperts with Formatter
3. Не работает F1 в Object Inspector	Update 2	IDEFixPack 2.9 от Andreas Hausladen (dev. snapshots)
4. Если IDE начинает падать с сообщением "Out of resources", возможно, что поврежден .res файл проекта.		Удалить его, запустить IDE, открыть проект - новый .res файл будет создан автоматически.
5. В редакторе не работает Class Completion, если в декларируемом классе есть поля с шаблонами.		Перед декларированием поля добавить public или private и т.д.
6. TTrayIcon.ShowBalloonHint() не работает на ОС ниже Vista [QC 77561]	Update 2	* Установить Update 2 * ИЛИ почитать о причинах и решении проблемы на форуме embarcadero и в QC * ИЛИ воспользоваться альтернативой, например Cooltray 4.4.0
...

Обзор багов от mcka

Как уменьшить размер создаваемого EXE ?

Всего записей: 1696 | Зарегистр. 13-10-2005 | Отправлено: 14:28 26-08-2009 | Исправлено: data man, 18:27 06-08-2010

zeugene Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору neznayka3 Я бы в обработчике OnKeyPress производил поиск и выводил подходящие в выпадающем списке.
	Всего записей: 51 \| Зарегистр. 03-01-2003 \| Отправлено: 21:11 01-12-2010

Full Member

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

neznayka3

Цитата:

подскажите как реализовать поиск в lookupcombox-e по нескольким полям. хочу ввод адреса как в ДубльГис.

подробнее пожалуйста. не ясно что хотите.

Всего записей: 516 | Зарегистр. 07-06-2007 | Отправлено: 00:08 02-12-2010

neznayka3 Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору YuriyRR
	Всего записей: 385 \| Зарегистр. 07-06-2007 \| Отправлено: 02:37 02-12-2010

Junior Member

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

neznayka3
Примерно так:

procedure TfrmNewFund.edCompanyKeyPress(Sender: TObject; var Key: Char);
var
i: Integer;
begin
//заполняем выпадающий список (из базы загружаем только записи,
//начинающиеся с первой введённой буквы)
if (edCompany.Text = '') and (ord(Key) > 32) then
begin
Screen.Cursor := crHourGlass;
edCompany.Items.Clear;
with dsCompanys do
begin
if Active then
Close;
SelectSQL.Clear;
SelectSQL.Add('select company_name from companys where UPPER(company_name) ' +
'LIKE UPPER(''' + Key + '%'') ORDER by company_name');
Open;
FetchAll;
edCompany.Items.BeginUpdate;
for i := 1 to RecordCount do
begin
edCompany.Items.Add(VarToStr(dsCompanys['COMPANY_NAME']));
Next;
end;
edCompany.Items.EndUpdate;
Close;
edCompany.DroppedDown := True;
Screen.Cursor := crDefault;
end;
end;
end;

Если нужно, чтобы список ещё и автоматически открывался, как на скриншоте, то добавить ещё:

procedure TfrmNewFund.edCompanyChange(Sender: TObject);
begin
if edCompany.Text = '' then
begin
edCompany.DroppedDown := False;
edCompany.Clear;
end;
end;

Всего записей: 51 | Зарегистр. 03-01-2003 | Отправлено: 08:16 02-12-2010

tanaseduard Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Как запустить приложение из Delphi под другим пользователем в AD. Соответственно указав имя и пароль нужного пользователя.
	Всего записей: 518 \| Зарегистр. 21-11-2009 \| Отправлено: 10:29 02-12-2010

neznayka3

Member

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

zeugene
не то. по 1 полю у меня сейчас примерно так и работает, только с cxLookupComboBox. фишка у дубльгис в том что поиск идет по нескольким полям, и их порядок значения не имеют. можно начать набирать сначала номер дома, потом улицу и тд.
например в таблице поля "ФИО", "ИНН", "что то еще". надо, чтобы пользователь мог начать поиск с любого из перечисленных полей.

Всего записей: 385 | Зарегистр. 07-06-2007 | Отправлено: 12:21 02-12-2010

Junior Member

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

neznayka3
А если сделать представление (VIEW), с полем, куда будет входить содержимое всех нужных полей и искать уже по нему?

Добавлено:
tanaseduard
RUNAS
Можно набрать в консоли Windows RUNAS /? чтобы узнать дополнительные параметры.

Всего записей: 51 | Зарегистр. 03-01-2003 | Отправлено: 12:43 02-12-2010

tanaseduard Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору zeugene Почти то что надо, но нельзя вводить пароль. А хотелось бы автоматом.
	Всего записей: 518 \| Зарегистр. 21-11-2009 \| Отправлено: 13:11 02-12-2010

Ktf

Junior Member

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

Цитата:

Как запустить приложение из Delphi под другим пользователем в AD. Соответственно указав имя и пароль нужного пользователя.

tanaseduard
в общих чертах нужно сделать следующее:
1. получить Token пользователя с помощью LogonUser
2. передать полученный Token в функцию CreateProcessAsUser

Всего записей: 139 | Зарегистр. 05-03-2007 | Отправлено: 13:13 02-12-2010 | Исправлено: Ktf, 13:14 02-12-2010

zeugene Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору tanaseduard Решение здесь: http://forum.codenet.ru/showthread.php?t=20138
	Всего записей: 51 \| Зарегистр. 03-01-2003 \| Отправлено: 13:35 02-12-2010

tanaseduard

Full Member

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

Ktf
zeugene
Спасибо. Вроде оно.

Добавлено:
Как из DataSet'а получить рисунок по его коду, который в Blob храниться, и загрузить его в Image?
Храниться в формате BMP.

Всего записей: 518 | Зарегистр. 21-11-2009 | Отправлено: 15:50 02-12-2010

Full Member

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

tanaseduard

Цитата:

Как запустить приложение из Delphi под другим пользователем

В omnithreadlibrary в файле DSiWin32.pas есть функция
function DSiExecuteAsUser(const commandLine, username, password: string;
const domain: string = '.'; visibility: integer = SW_SHOWDEFAULT;
workDir: string = ''; wait: boolean = false): cardinal;

Добавлено:
tanaseduard

Цитата:

Как из DataSet'а получить рисунок по его коду, который в Blob храниться, и загрузить его в Image?

1.В датасете делаешь Lookup по полю кода рисунка
2.Сохраняешь его в memorystream
3.Загружаешь из этого потока в Image

Всего записей: 516 | Зарегистр. 07-06-2007 | Отправлено: 22:19 02-12-2010

tanaseduard Full Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору YuriyRR Спасибо попробую оба варианта.
	Всего записей: 518 \| Зарегистр. 21-11-2009 \| Отправлено: 22:49 02-12-2010

KSJJFS Newbie	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Как можно удалить созданый мной(не нужный) рабочий стол в делфи , на панельки "Desktop" или View"/"Desktops"/
	Всего записей: 7 \| Зарегистр. 06-11-2010 \| Отправлено: 19:03 03-12-2010

0D0A Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору KSJJFS Удалить соответствующий dst-файл в User\AppData\Embarcadero\BDS\8.0
	Всего записей: 158 \| Зарегистр. 21-09-2009 \| Отправлено: 19:15 03-12-2010

ZBEP

Junior Member

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

Кто-нибудбь может разъяснить, как в XE с помощью INDY 10, используя idIRCserver создать IRC сервер, к которому можно было бы приконнектится не по локалке, а через интернет.

Знаю, как сделать локальный чат с помощью IdIRCServer и IdIRC, знаю как реализовать связь через инет с чужим IRC сервером с помощью IdIRC, но не знаю, что надо сделать с IdIRCServer, что бы к нему можно было подключаться через инет.
В демках инди все либо для локали, либо не для IRC.
Пытался и через TCP все реализовать, но тоже не получилось реализовать подключение к внешнему IP, к локальному все без проблем.

Всего записей: 186 | Зарегистр. 09-04-2009 | Отправлено: 20:59 03-12-2010 | Исправлено: ZBEP, 21:02 03-12-2010

Frodo_Torbins Silver Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору ZBEP Я бы в первую очередь в сторону настроек брандмауэра смотрел, и способа подключения к инету.
	Всего записей: 2318 \| Зарегистр. 24-05-2007 \| Отправлено: 21:56 03-12-2010

ZBEP

Junior Member

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

Frodo_Torbins, брандмауэр отключал и на всяк случай разрешал, ноль реакции, по сети норм все, по инету никак.
Инет через ADSL, скорее всего в этом и косяк, но как то же и с ADSL реализовать все это можно.
В сети 8 человек, модем раздает каждому внутренний ип, вписывая его, локальные сообщения удачно передаются/принимаются.
Модему выдаётся внешний ип провайдером, приконнектиться к нему не получается

Всего записей: 186 | Зарегистр. 09-04-2009 | Отправлено: 22:29 03-12-2010

Frodo_Torbins Silver Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору ZBEP Вот-вот провайдер мог вас подключить через прокси или еще как, а вы теперь мучаетесь.
	Всего записей: 2318 \| Зарегистр. 24-05-2007 \| Отправлено: 22:45 03-12-2010

ZBEP Junior Member	Редактировать \| Профиль \| Сообщение \| Цитировать \| Сообщить модератору Frodo_Torbins, вот я и мучаюсь Есть идеи как решить эту проблему? Гуугл мучаю мучаю, но все не то..
	Всего записей: 186 \| Зарегистр. 09-04-2009 \| Отправлено: 22:59 03-12-2010 \| Исправлено: ZBEP, 23:39 03-12-2010

Открыть новую тему

Написать ответ в эту тему

Страницы: 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 103 104 105 106 107 108 109 110 111

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (версии 2009, 2010 Weaver, 2011 Fulcrum)

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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC