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

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 4

Модерирует : ShIvADeSt

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

   

Lenia05

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите как можно узнать какие данные нужно послать серверу к примеру что бы создать ответ в теме (Ну к примеру как вот тут мы оставляем ответы). Если кто может помочь вот код страницы http://slil.ru/26499471
Всего записей: 14 | Зарегистр. 27-08-2006 | Отправлено: 16:57 31-12-2008
bornbill



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Перечитал по теме много. задача в принципе тривиальна но толи мозг закостенел то ли давно программированием не занимался
 
Выложите пожалуйста полный пример как получить все ссылки со страницы с помощью WebBrowser. примеров полно но они отрабатывают без ошибки только в том случае если все фреймы находяться на текущем домене если фреймы беруться с другого домен то отказано в доступе.... толком не разобраться в отличиях webbrowser, webrowser2. уже пытались мне помочь и ответили на подобный вопрос многоуважаемый камрад anfilat но завести мне его не удалось....
ответ собственно
 
заранее благодарен за полный рабочий пример по выдиранию всех ссылок(во всех фреймах, включая фреймы с других доменов) в загруженной странице
Всего записей: 1440 | Зарегистр. 02-04-2004 | Отправлено: 18:05 02-01-2009
RoRU2008

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

Цитата:
Кстати не знаете в чём может быть фокус? Дома недавно купленная лицензионная виста. На Delphi 2006 архитект тоже лицензия. Никогда проблемм с D6 (не 2006) не было. Теперь вот на висте у меня сообщение читаю при каждом запуске, что мол программа плохо работает из-за несовместимости.

 
Виста поддерживает программную виртуализацию. Если не совместимый софт пытается писать в системные каталоги, то происходит прозрачное перенаправление. То же самое касается веток реестра. Скорее всего это причина предупреждений.
см. подробнее http://www.osp.ru/win2000/2007/06/4361392/ или на сайте MS  
 
 
Добавлено:
bandyn

Цитата:
К моему сожалению DbGridEx не работает с ODAC по локальной сортировке
Подскажите плиз имеется-ли другой DBGrid работающий с ODAC ?

 
Локальную сортировку (именно локальную, в памяти клиента) поддерживает грид от
Developer Express. В частности поддерживается инкрементальный поиск по столбцу.
Значительный минус в том, что при этом вытягиваются все данные запроса.
Всего записей: 2 | Зарегистр. 01-06-2008 | Отправлено: 17:47 03-01-2009
Maks150988



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Мне нужен был скроллер текста. Чтоб плавно крутил текст по горизонтали. Итак, сделал вроде бы контрол.
На утечку GDI объектов проверил через диспетчер задач, вроде бы все чисто, хотя хотелось бы услышать ваше мнение.
>>>
И еще я бы хотел сделать такую фичу у контрола. Например когда текст скроллится слева направо, то когда он доскроллится до конца, он начал бы скроллиться обратно. Ну и наоборот. Я уж было хотел в case TScrollMode of  под цифрой 3 такую реализацию сделать, но пока недополнял что делать при различных значениях. Например
             Inc(xCopyPos);
             if (xCopyPos > (iScrlWidth + TextWidth + 25)) then
               xCopyPos := 0;
заменить на
             Inc(xCopyPos);
             if (xCopyPos > (iScrlWidth + TextWidth + 25)) then
               xCopyPos := iScrlWidth + TextWidth + 25;
и сменить тип или что чтобы BitBlt в обратную пошел. Чего-то не придумывается алгоритм.
 
И вот сейчас у меня фоновый цвет непрозрачный. Попробовал через WM_CTLCOLORSTATIC вернуть кисть Result := GetStockObject(NULL_BRUSH), но фон так и остался стандартный. Может как-то через BitBlt можно перекопировать только нужные части, например ведь можно же вроде копировать белый/черный текст с флагами в этой функции. Правда наверное нужно красить черным цветом например созданный битмап для HDC и например белый цвет возвращать в надпись?
Всего записей: 836 | Зарегистр. 23-12-2006 | Отправлено: 04:03 04-01-2009 | Исправлено: Maks150988, 19:43 04-01-2009
Aladdinych



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите плз как можно сделать чтобы по выходу из пользовательского приложения в памяти оставался некий модуль. Чтобы из приложения его можно было активизировать в памяти или наоборот можно было выгружать из памяти. Чтобы при активизации модуля проверять наличие его копии в памяти.
Как в дельфи можно создать такой модуль?
Всего записей: 323 | Зарегистр. 18-10-2005 | Отправлено: 14:24 06-01-2009
lerthe61

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Aladdinych
Можно создать, к примеру, процесс. При завершении породившего его процесса он будет продолжать оставаться в памяти.
Всего записей: 74 | Зарегистр. 04-05-2007 | Отправлено: 14:29 06-01-2009 | Исправлено: lerthe61, 14:35 06-01-2009
yakostik

Full Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите ответ на такой вопрос
пишу программку типа календарь, мини блокнота для записей и тел справочник
Хочется сделать такую вещь которую часто видел но как то не задумался как она делается, слева по форме расположить пару кнопок узеньких по нажитию на которые должны появляться мини формы с календарем или деревом отделов для справочника телефонов
 
Вопрос собственно вот в чем как по вашему лучше реализовать
У меня пока одна идея создать дочернюю форму и показывать ее программно приклеив к основной форме
 
Может кто то подскажет другое решение  
Заранее спасибо
 
Всего записей: 408 | Зарегистр. 30-03-2006 | Отправлено: 00:18 07-01-2009
lerthe61

Junior Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
yakostik
Рекомендую глянуть на DevExpress компоненты, кажется я там такое готовое встречал.
А у вас ссылочки на скриншот подобного интерфейса нет?
Всего записей: 74 | Зарегистр. 04-05-2007 | Отправлено: 12:20 07-01-2009
Frodo_Torbins

Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
yakostik
Простейший вариант кинуть на форму несколько панелей с одинаковыми размерами и положением. Но постоянно видимой из них должна быть только одна. Единственный минус - такие панели неудобно редактировать, постоянно приходится делать "Bring to front" и "Send to back".
Всего записей: 2319 | Зарегистр. 24-05-2007 | Отправлено: 14:20 07-01-2009
yakostik

Full Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
lerthe61
Спасибо гляну на компоненты
Frodo_Torbins
Конечно тоже вариант но мне бы хотелось что бы появляющие части имели размер отличный от основной формы хотя если сильно не заморачиваться с дизайном то может быть Ваш вариат действительно более приемлем чем мой с созданием дочерних окон
Всего записей: 408 | Зарегистр. 30-03-2006 | Отправлено: 17:37 07-01-2009
Frodo_Torbins

Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
yakostik
Кстати если действовать по вашему методу, то создавать не дочернюю форму а фрейм.
Всего записей: 2319 | Зарегистр. 24-05-2007 | Отправлено: 17:52 07-01-2009
Maks150988



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Разобрался со скроллером.
 
У меня такой вопрос. Как отобразить сокращенную копию с современным видом диалог GetOpenFileName? Такое например при октрытии плейлистов в Винампе. То есть нет слева тулбара в диалоге.
Какая комбинация OFN флагов нужна и нужен ли хук в оконную функцию? Раньше как-то получалось, а потом за ненадобностью подзабыл.
Всего записей: 836 | Зарегистр. 23-12-2006 | Отправлено: 20:41 07-01-2009
ShIvADeSt



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

Цитата:
Какая комбинация OFN флагов нужна и нужен ли хук в оконную функцию? Раньше как-то получалось, а потом за ненадобностью подзабыл.

OFN_EXPLORER
Indicates that any customizations made to the Open or Save As dialog box use the new Explorer-style customization methods. For more information, see Explorer-Style Hook Procedures and Explorer-Style Custom Templates.  
 
By default, the Open and Save As dialog boxes use the Explorer-style user interface regardless of whether this flag is set. This flag is necessary only if you provide a hook procedure or custom template, or set the OFN_ALLOWMULTISELECT flag.
 
If you want the old-style user interface, omit the OFN_EXPLORER flag and provide a replacement old-style template or hook procedure. If you want the old style but do not need a custom template or hook procedure, simply provide a hook procedure that always returns FALSE.

----------
И создал Бог женщину... Существо получилось злобное, но забавное...
Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 05:21 08-01-2009
Maks150988



Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ShIvADeSt
Не, не то. Нужен FlagsEx := OFN_EX_NOPLACESBAR. Случайно его нашел в исходниках модулей.
А вот пример чтобы со скроллером поиграться. Может кому-нибудь полезным будет.
http://webdrive.avtograd.ru/Download/Explorer/sources/text_scroller_src.zip
Хотя может и у кого будут какие-нибудь предложения по усовершенствованию.
=)
Всего записей: 836 | Зарегистр. 23-12-2006 | Отправлено: 11:12 08-01-2009
Rudia



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Нужен пример или компонент для того, чтобы узнать загрузку процессора конкретным приложением.
Всего записей: 324 | Зарегистр. 13-09-2006 | Отправлено: 14:57 10-01-2009
lorents



Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
кто может мне если не трудно объяснить каждую из строк?

Код:
unit Unit1;
interface
uses
   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
   Dialogs, ActiveX, ComObj, StdCtrls;
type
   TForm1 = class(TForm)
     Button1: TButton;
     procedure Button1Click(Sender: TObject);
   private
     { Private declarations }
   public
     { Public declarations }
   end;
var
   Form1: TForm1;
implementation
{$R *.dfm}
procedure ShowPhotoPrintWizard(Files: TStringList);
var
   I: Integer;
   CommonDialog: OleVariant;
   { Файлы фотографий на печать }
   Vector: OleVariant;
begin
   if not Assigned(Files) then
     Exit;
   CommonDialog := CreateOleObject('WIA.CommonDialog');
   Vector := CreateOleObject('WIA.Vector');
   for I := 0 to Files.Count - 1 do
     Vector.Add(Files[I]);
   CommonDialog.ShowPhotoPrintingWizard(Vector);
   Vector := Unassigned;
   CommonDialog := Unassigned;    
end;
procedure TForm1.Button1Click(Sender: TObject);
var
   List: TStringList;
begin
   List := TStringList.Create;
   with List do
   try
     Append('C:\WINDOWS\Штукатурка.bmp');
     Append('C:\WINDOWS\Рододендрон.bmp');
     ShowPhotoPrintWizard(List);
   finally
     Free;
   end;
end;
end.  

просто я на Delphi не знаю, отсюда вся эта проблема
пожалуста помогите
Всего записей: 3299 | Зарегистр. 30-12-2007 | Отправлено: 18:19 10-01-2009
delover

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
lorents
lorents
Это, дорогой, не Дельфи, это Вижуал-Бэйсик. Формируется список файлов bmp в методе клик, далее создаются никому не понятные, именнованные объекты WIA и делают совершенно непонятный ShowPhotoPrintWizard. Советую искать инструкцию к WIA бэйсику. Дельфи "предполагает", что метод Show действительно существует у OleVariant-а который CommonDialog.
 
 
Добавлено:
RoRU2008
Думаю, что она раньше поддерживала. Купил недавно Касперский Интернет Секурити, чё то не то при установке выбрал, он вообще на каждый чих ругается, так что у Висты просто руки не доходят до вюртуализации. Когда я говорил о:

Цитата:
И странно что D5 такого сообщения не выдаёт.

Я имел ввиду ветку:
HKEY_LOCAL_MACHINE://SOFTWARE\Microsoft\Windows NT\CurrentVersion\AeDebug
Делфи там всегда пытается что либо вписать, иначе как? Так вот, узнал, что для Висты delphi32.exe от версии 6.0 и от версии 7.0 это один и тот же файл, файл 7.0, страннно
 
ShIvADeSt
Спасиб на добром слове, да в инструкции я не писал, однако иногда езжу в деревню и бывает хочется чем-то похвастаться, а там Win-95. Инструкцией хвастаться не хочу.
Всего записей: 1395 | Зарегистр. 25-06-2007 | Отправлено: 07:46 11-01-2009 | Исправлено: delover, 08:02 11-01-2009
lorents



Silver Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
delover
понятно, ну чтох пойду разбираться дальше
Всего записей: 3299 | Зарегистр. 30-12-2007 | Отправлено: 08:50 11-01-2009
ShIvADeSt



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

Цитата:
Это, дорогой, не Дельфи, это Вижуал-Бэйсик.

Не шуткуй так Это чистое Дельфи.  


----------
И создал Бог женщину... Существо получилось злобное, но забавное...
Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 10:36 11-01-2009
delover

Advanced Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
ShIvADeSt
Не, я имел ввиду что это не VCL. Сначала искал Show в хелпе, далее открыл юнит

Код:
 
unit Dialogs;
...
interface
...
type
 
{ TCommonDialog }
 
  TCommonDialog = class(TComponent)
  private
...
    property OnShow: TNotifyEvent read FOnShow write FOnShow;
  end;
 
{ TOpenDialog }
 

Нужного Show... нет.
Без хелпа до TLB добраться трудно.
Всего записей: 1395 | Зарегистр. 25-06-2007 | Отправлено: 10:55 11-01-2009 | Исправлено: delover, 10:55 11-01-2009
   

Страницы: 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 (все версии) - часть 4
ShIvADeSt (28-06-2009 02:10): Продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=10477


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

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

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru