Доброго времени суток, THE_PRO! Мы так и подумали :) -------------------------- -=Experts helper: testmode=- Ответ отправлен: 06.08.2004, 08:28 Отправитель: samum2000
Вопрос № 1716
Здравствуйте, уважаемые эксперты. Объясните пожалуйста такую ситуацию: в модуле IDStack.pas в разделе interface описывается класс TIdStack и в разделе public этого класса описывается функция function WSGetLocalAddress: string; virtual; abstract; но далее в разделе implementation эта функция не "реализуется" и в MSDN я такой функции не нащел... Скажите пожалуйста, откуда берется значение этой функции (как оно вычисляется)?
Приветствую Вас, Владимир! Eto abstratktnaya function chto onachayet chto yeye mojno ne opredelyat (yesli mne pamyat ne izmenyayet) Kstati, posmotri v klassax roditelyax (yesli takoviye yest). Ответ отправлен: 04.08.2004, 16:50 Отправитель: THE_PRO Отвечает samum2000
Приветствую Вас, Владимир! Все правильно. Объявленный таким образом метод не должен иметь реализации в данном классе, но должен быть реализован в классах - потомках. Поробней об этом можно прочитать в справке по Delphi. -------------------------- -=Experts helper: testmode=- Ответ отправлен: 06.08.2004, 08:28 Отправитель: samum2000 Отвечает sir henry
Добрый день, Владимир! А Вы не ошиблись? Функция расположена в разделе protected, т.е. запрещена для прямого использования. Если Вы внимательно просмотрите класс TIdStack до конца, то обнаружите свойство LocalAdress, которое использует указанную Вами функцию для чтения адреса. Ответ отправлен: 05.08.2004, 06:20 Отправитель: sir henry
Вопрос № 1717
Подскажите пожалуйста как в Delphi (CBuilder) напечатать (вывести на принтер) таблицу из StringGrid. Заранее спасибо.
Здравствуйте, GreenPeace! Модуль не влез в рассылку, поэтому я отослал его на E-mail. А вот как использовать все то, что там написано: procedure TForm1.Button1Click(Sender: TObject); var K: Double; begin Printer.BeginDoc; K := Printer.Canvas.Font.PixelsPerInch / Canvas.Font.PixelsPerInch*1.2; PrintStringGrid(StrGrid, K, // Коэффициент 200, // отступ от края листа в пихелах по Х 200, // --"-- по Y 200 // отступ снизу ); Printer.EndDoc; end; -------------------------- -=Experts helper: testmode=- Ответ отправлен: 06.08.2004, 08:28 Отправитель: samum2000 Отвечает THE_PRO
Доброе время суток, GreenPeace! StringGrid.Print Ответ отправлен: 05.08.2004, 09:28 Отправитель: THE_PRO
Вопрос № 1718
Здравствуйте уважаемые эксперты. Посоветуйте мне, пожалуйста, как быть. В приложении имеется функция, вызывается несколько десятков раз, с разными параметрами sql запроса и выдает количество записей соответствующих условию. Общее задание выполняется довольно медленно. Как мне её можно оптимизировать. Как я думаю весь тормоз в Active:=true; Как по другому сделать не знаю, недавно с SQL. Адрес – vornik(собачка)mail.kz
Доброе время суток, Nik! Надо бы индексы посмотреть. От наличия индексов зависит скорость выборки. Ответ отправлен: 05.08.2004, 09:10 Отправитель: sir henry Отвечает THE_PRO
Здравствуйте, Nik-азарник! function TDM.sqlqueryactive(s1:string):integer; begin with TQuery do begin sql.Text:=s1; Open; Result:=dm.TQuery.RecordCount; end; end; //tebya tormoit ne "Active:=true" a "Refresh" Ответ отправлен: 05.08.2004, 09:26 Отправитель: THE_PRO
Вопрос № 1719
Здравствуйте уважаемые эксперты. Подскажите, пожалуйста. Через Tquery в DBGrid вывожу данные. Не могу сделать, чтобы столбцы были фиксированной ширины, в редакторе устанавливаю их размеры, но при выполнении запроса выводятся совсем не той ширины столбцы. Как лечить? Адрес – vornik(собачка)mail.kz
Добрый день, Nik! А Вы ширину столбца в DBGrid задаете или еще где-то? Ответ отправлен: 05.08.2004, 09:16 Отправитель: sir henry Отвечает THE_PRO
Приветствую Вас, Nik! V redaktore cheqo? TQuery ili DBGrid Nujno v dbgride. I yesho nado shtob polya ne menyalis! Ответ отправлен: 05.08.2004, 09:23 Отправитель: THE_PRO Отвечает samum2000
Приветствую Вас, Nik! После выполнения запроса для каждого поля изменяйте ширину. -------------------------- -=Experts helper: testmode=- Ответ отправлен: 07.08.2004, 10:11 Отправитель: samum2000
Вопрос № 1720
Здравствуйте! Такая странность - была у меня Delphi 6 и на панели Internet были компоненты ClientSoket и ServerSocket, а сейчас стоит Delphi 7 и этих компонентов почемуто нет, хотя в справке по компонентам они есть (написано "только для Windows"). Работаю под Windows. Не подскажете в чем проблема? Или их как-то нужно включать отдельно?
Приветствую Вас, k.o.! Эти компоненты включены в поставку, но не установлены по-умолчанию. Нужно добавить пакет (Components->Install Packages->Add) dclsockets70.bpl? который расположен в папке Bin. -------------------------- -=Experts helper: testmode=- Ответ отправлен: 06.08.2004, 08:28 Отправитель: samum2000 Отвечает THE_PRO
Доброе время суток, k.o.! Ishi bpl v papke bin Ответ отправлен: 05.08.2004, 09:18 Отправитель: THE_PRO
Вопрос № 1721
Dlya sir henry Kak mojno izvlech vse stringi iz exe ili dll?
Добрый день, THE_PRO! Для этого надо, как минимум, знать, сколько их :)). А извлечь строку можно так: var h: THandle; S: array [0..255] of Char; begin h := LoadLibrary('MY.DLL');{Грузим в память dll или exe с ресурсами} if h <= 0 then ShowMessage('Увы!!! ФигВам!') else begin SetLength(S, 512); LoadString(h, 1, @S, 255); {Грузим строку по ее номеру} FreeLibrary(h); end; end; --------------- Если, конечно, я правильно понял Ваш вопрос. Под "stringi" Вы имели в виду строковые ресурсы? Ответ отправлен: 05.08.2004, 10:05 Отправитель: sir henry
Вопрос № 1722
Здравствуйте! Скачал набор иконок в формате .PNG. Красивые иконки с тенью в стиле Windows XP. Хочу использовать их в своём приложении на панели инструментов. Как быть? Хочу, чтобы была тень. Как быть?
Добрый день, Lerry! Вопрос, воистину, гамлетовский :)). Будьте именно так, как Вы захотите :)). Проблема то в чем? Ответ отправлен: 06.08.2004, 12:16 Отправитель: sir henry Отвечает samum2000
Здравствуйте, Lerry! А в чем дело? Конвертируйте его в любой подходящий формат (например BMP) и используйте в своем приложении. -------------------------- -=Experts helper: testmode=- Ответ отправлен: 08.08.2004, 10:01 Отправитель: samum2000 Отвечает Boriss
Добрый день, Lerry! А почему вопрс два раза? Ответ отправлен: 09.08.2004, 11:39 Отправитель: Boriss
Вопрос № 1723
Здравствуйте, эксперты! Есть ли у кого из вас компонент для Delphi 5/6/7 - Free Internet (FreeInter.dpk) для работы с почтовыми протоколами? Если найдете - вышлите на мыло. Нужен именно он. Еще он был на диске к книге Михаила Фленова "Программирование в Delphi глазами хакера".
Здравствуйте, Alex! А Вы на поисковик не хотите заглянуть? Ответ отправлен: 06.08.2004, 13:48 Отправитель: sir henry Отвечает samum2000
Доброго времени суток, Alex! Я советую поискать в каком-нибудь поисковике (www.ya.ru, www.r0.ru) фразу "FreeInter.dpk". Где-нибудь и всплывет. -------------------------- -=Experts helper: testmode=- Ответ отправлен: 08.08.2004, 10:01 Отправитель: samum2000
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.