Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

За 2003-12-24

Re[2]: Меню

Здарова, Victor!

24 декабря 2003 г., 03:08:31, ты намылил:

VVV> Такие вещи делаются как расширения оболочки (Shell Extensions).
VVV> Можно поискать в MSDN "Creating Shell Extension Handlers".
VVV> Если надо - могу поискать примеры.

Да, поищи, плиз!!!

   Томилов Александр 2003-12-24 23:31:40 (#41714)

Re: Delphi Help ОЧЕНЬ ПОДРОБНО!!!

> Чем-то вроде AssignFile(f,'---');reset(f); явно не выйдет

Это почему же? У меня, вот, только что замечательно вышло...

var myFile: TextFile;
myStr: string;
begin
myMemo.Clear;
AssignFile(myFile, ParamStr(0));
Reset(myFile);
while not EOF(myFile) do
begin
ReadLn(myFile, myStr);
myMemo.Lines.Add(myStr);
end;
CloseFile(myFile);
end;
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Daw 2003-12-24 18:34:42 (#41568)

Re: Delphi Help ОЧЕНЬ ПОДРОБНО!!!

> From Borman
> У нас есть исходник в Дельфе.Что там написать, чтоб было реально при его работе
> (как скомпиленого ЕХЕ-файла) можно было что нибудь из него(ЕХЕ-файла) прочесть
> (сам себя чтоб читал!!!).Чем-то вроде AssignFile(f,'---');reset(f); явно не
выйдет,
> а как тогда??? Причем нам нужно только чтение (не ЗАПИСЬ).Если можно, то без
> использования библиотеки FORMS.

Может я не понимаю задание, но схема может быть такой:
1) RichEdit
2) RichEdit1.PlainText:=True;
3) Form1.OnActivate - RichEdit1.Lines.LoadFromFile(ParamStr(0));
Борис Сурин. bsur***@m*****.ru
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2003-12-24 17:59:52 (#41548)

Re: Edit

> Народ, подскажите пожалуйста как можно сделать так, чтобы при вводе
> в Edit и нажатии кнопки
> происходил подсчет пробелов и в месаге выводилось самое большое значение!
> Заранее спасибо.

Не ясно, самое большое из чего? Из нескольких - вот как для каждого найти число
пробелов
Написать процедуру-обработчик события OnExit (раз другая кнопка, то Edit теряет
фокус и возникает это событие). А в ней:
count:=0;
for i:=1 to length(Edit1.Text) do
if Edit1.Text[i] = ' ' then Inc(count)
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2003-12-24 17:45:49 (#41528)

Текстовый редактор

Здравствуйте!
Большое спасибо всем кто дал советы и ссылки насчет открытия WORD-овского
документа.
БОЛЬШОЕ СПАСИБО!

-***-
С уважением,
Galina mailto:SGal***@i*****.ru
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2003-12-24 17:38:23 (#41521)

Delphi Help ОЧЕНЬ ПОДРОБНО!!!

From Borman
У нас есть исходник в Дельфе.Что там написать, чтоб было реально при его работе
(как скомпиленого ЕХЕ-файла) можно было что нибудь из него(ЕХЕ-файла) прочесть
(сам себя чтоб читал!!!).Чем-то вроде AssignFile(f,'---');reset(f); явно не выйдет,
а как тогда??? Причем нам нужно только чтение (не ЗАПИСЬ).Если можно, то без
использования библиотеки FORMS.
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2003-12-24 17:19:32 (#41507)

количество дисплеев

Здравствуйте!
У меня такая проблема:
Есть компьютер с Windows 2000 и GeForce 5.
У карточки GeForce есть TV out. Я делаю clone так, что бы на телевизоре видеть
тоже изображение, что и на дисплее.
Когда я захожу на страничку параметров GeForce, там показанно, подключён ли TV
или нет.
Но если я пытаюсь из программы прочитать количество дисплеев (с помощью MonitorEnumProc
или GetSystemMetrics) то всегда получаю 1. Я так понял, что эти функции дают
количество различных (не clone) дисплеев.
Знает ли кто-то, как узнать количество clone дисплеев? Есть такая программа -
TVTool она это делает, но как?

Спасибо

Вадим
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Vadim 2003-12-24 17:11:02 (#41497)

Re: Edit

> Народ, подскажите пожалуйста как можно сделать так, чтобы при
вводе
> в Edit и нажатии кнопки
> происходил подсчет пробелов и в месаге выводилось самое большое значение!
> Заранее спасибо.
В обработчике нажатия кнопки организовать цикл от 1 до Length(Edit.Text), и
если Edit.Text[i] = ' ', то увеличить счетчик пробелов на 1.
Если Едитов несколько (я не понял, насчет "самого большого значения", видно,
это имеется в виду), можно этот фрагмент оформить функцию, в которую нужно
передать Edit.Text, а вернет она число пробелов. Тогда вызывай ее для
каждого Едита и фиксируй наибольшее - задача для студента 1-го курса.
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   "Вадим Шешунов" 2003-12-24 16:40:29 (#41483)

Re: Dowonload\Upload

Нет ли аналога данного кода на С++?

Original Message From: "Surin_bp" <surin_***@m*****.ru>
To: "comp.soft.prog.prog (3585363)" <mark***@a*****.ru>
Sent: Wednesday, December 24, 2003 11:53 AM
Subject: Re: Dowonload\Upload

Начиная с Internet Explorer 3, Microsoft поддерживает очень полезные API,
Wininet.
Эти функции позволяют использовать все возможности IE, такие как настройки
прокси,
кэширование файлов и т.д.

Ниже приведён пример использования этих функций для скачивания файла с
нужного
URL. Это может быть любой доступный URL, ftp://, http://, gopher://, и т.д.

Более подробную информацию об этих функция можно посмотреть в MSDN - Win32
Internet
API Functions.

function DownloadFile(const Url: string): string;
var
NetHandle: HINTERNET;
UrlHandle: HINTERNET;
Buffer: array[0..1024] of char;
BytesRead: cardinal;
begin
Result := '';
NetHandle := InternetOpen('Delphi 5.x', INTERNET_OPEN_TYPE_PRECONFIG, nil,
nil, 0);

if Assigned(NetHandle) then
begin

UrlHandle := InternetOpenUrl(NetHandle, PChar(Url), nil, 0,
INTERNET_FLAG_RELOAD,
0);

if Assigned(UrlHandle) then
{ UrlHandle правильный? Начинаем загрузку }
begin
FillChar(Buffer, SizeOf(Buffer), 0);
repeat
Result := Result + Buffer;
FillChar(Buffer, SizeOf(Buffer), 0);
InternetReadFile(UrlHandle, @Buffer, SizeOf(Buffer), BytesRead);

until BytesRead = 0;
InternetCloseHandle(UrlHandle);
end
else
begin
{ UrlHandle неправильный. Генерируем исключительную ситуацию. }
raise Exception.CreateFmt('Cannot open URL %s', [Url]);
end;

InternetCloseHandle(NetHandle);
end
else
{ NetHandle недопустимый. Генерируем исключительную ситуацию }
raise Exception.Create('Unable to initialize Wininet');
end;

Взято с Исходников.ru http://www.sources.ru
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   "Vlad Sviridov" 2003-12-24 16:36:42 (#41477)

Опять около програмная тема

Здравствуйте все!

Меня интересуют программы для хранения в упорядоченном виде текстов (исходных
и не только), и другой полезной информации на СВОЁМ винте.
Вообще мне бы хотелось рассмотреть проблемму более детально..
Кто где хранит различные FAQ, руководства, описания, схемы и тд?..
Может имеются какие-то свои хитрости, нюансы.

Или эта проблемма интересует только меня?..
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2003-12-24 16:18:02 (#41470)

Edit

Народ, подскажите пожалуйста как можно сделать так, чтобы при вводе
в Edit и нажатии кнопки
происходил подсчет пробелов и в месаге выводилось самое большое значение!
Заранее спасибо.
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   Саня 2003-12-24 15:49:08 (#41447)

Re[2]: Не совсем по пограммированию

Здравствуйте Sad,

Tuesday, December 23, 2003, 1:35:24 PM, you wrote:

SS> Original Message SS> From: "Shutyaev Igor" <shutya***@i*****.ru>
SS> To: "comp.soft.prog.prog (2864311)" <spir***@c*****.ru>
SS> Sent: Tuesday, December 23, 2003 3:00 PM
SS> Subject: Re: Не совсем по пограммированию

>> >
>> >
>> > > > Здрасте.
>> > > >
>> > > > Вот вопрос такой. Есть w2k advanced server.
>> > > > При входе в сеть он начинает очень долго сканировать ресурсы. Ну
SS> очень
>> > > > долго. Как с этим бороться никто не знает?
SS> Попробуй просто убрать "internat.exe" с автозагрузки.
(Пуск "выполнить" -> "msconfig" -> "автозагрузка" ->"internat.exe")

   ViKiNG 2003-12-24 14:53:21 (#41416)

Re: SOS! Вопрос

Ccылки по теме, если это поможет=)

http://www.emanual.ru/cgi-bin/get.pl?id=4999&format=show
http://blackman.wp-club.net/myfaq/faq11j.php
http://lokatorprogs.narod.ru/delphi/faq3/misc.html#a6
http://lokatorprogs.narod.ru/delphi/faq3/misc.html#a7

Вообще из версии в версию формат DOC меняется
потому самым лучшем будет работать через ОЛЕ

И вот еще компонент TmxExports для экспорта DOC
(http://www.maxcomponents.net/components.html)

C уважением Sad Spirit

>
> > Здравствуйте, Galina,
> >
> > Wednesday, December 24, 2003, 1:27:34 PM, вы писали:
> >
> > G> Здравствуйте!
> > G> Кто может помогите.
> > G> У меня курсовая "Текстовый редактор". Он должен у меня
открывать
> > G> текстовые документы с разными расширениями. Открывает: .RTF, .TXT,
> .PAS.
> > G> Не открывает: .DOC. При открытии выводится всего одна
> > G> строчка:"РПаU:+/-б". Может где-то еще что-то нужно написать.
> > Во-первых, вы пытались открыть WORD-овский документ, который не
> > является "текстовым".
> > Во-вторых, его можно распознать и выдать в приемлемом виде, но пока я
> > вижу наипростой выход - это использовать OLE.
> Есть и другой вариант - открывать Вордовский документ в самом Ворде,
> используя ShellExecute. Не знаю, правда, насколько такой способ приемлем в
> курсовой (наверное, нужно продемонстрировать свои силы), зато вся мощь
Ворда
> будет использована.
> Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   "Sad Spirit" 2003-12-24 14:33:48 (#41405)

Re: SOS! Вопрос

Original Message From: "Шистеров Павел Михайлович" <schis-pm@j*****.ru>
To: "comp.soft.prog.prog (3553187)" <vadim_sheshun***@m*****.net>
Sent: Wednesday, December 24, 2003 11:41 AM
Subject: Re: SOS! Вопрос

> Здравствуйте, Galina,
>
> Wednesday, December 24, 2003, 1:27:34 PM, вы писали:
>
> G> Здравствуйте!
> G> Кто может помогите.
> G> У меня курсовая "Текстовый редактор". Он должен у меня открывать
> G> текстовые документы с разными расширениями. Открывает: .RTF, .TXT,
.PAS.
> G> Не открывает: .DOC. При открытии выводится всего одна
> G> строчка:"РПаU:+/-б". Может где-то еще что-то нужно написать.
> Во-первых, вы пытались открыть WORD-овский документ, который не
> является "текстовым".
> Во-вторых, его можно распознать и выдать в приемлемом виде, но пока я
> вижу наипростой выход - это использовать OLE.
Есть и другой вариант - открывать Вордовский документ в самом Ворде,
используя ShellExecute. Не знаю, правда, насколько такой способ приемлем в
курсовой (наверное, нужно продемонстрировать свои силы), зато вся мощь Ворда
будет использована.
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   "Вадим Шешунов" 2003-12-24 13:44:57 (#41385)