Пьяный дельфин 5 мая 2000

Hi !

Весна, млин.
На последней неделе три раза шел снег, а извращенцы, любящие на майские открывать купальный сезон, наверно головы об лед поразбивали на водохранилище ...

Ну, а Дельфин по прежнему с нами

Перл недели за алгоритмом обработки длинных имен файлов от Idle Sign (синтаксис и орфография автора сохранены)


if (ParamCount>0) and (paramcount<=4) then begin
path1:=paramstr(1)+' '+paramstr(2)+' '+paramstr(3)+' '+paramstr(4);
memo1.lines.loadfromfile(path1);
end;
if paramcount>4 then
messagedlg('Программа не поддерживает'#13#10'длинные имена каталогов',mterror, [mbyes],0);


Литературную премию имени Иосифа Бродского (давненько не было) получает Alex German

требуется или в ручную либо автоматически удалять селую строку в стринггриде


Проект доступен в OnLine по адресу: http://podgoretsky.com/DrunkenDolphin.html
(спасибо Анатолию Подгорецкому)

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


29.04.2000 Roman Petrovich

Значится имеется игра NFS5 я ее проинсталлировал по полной.... но при запуске выскакивает сообщение(запрос)...мол если вы не проинсталлировали игру то вставьте диск.... и две кнопки OK и Cancel... при нажатии на OK происходит нормальный запуск игры..!
Спрашивается можно ли как нить с помощью средств Дельфи подавить этот запрос...?

29.04.2000 Idle Sign

Я тут взял свои кисти и мольберт, почесал все,что чесалось, пораскинул всем, что осталось и накрапал.
--КУТ--
var path1:string;
begin
if (ParamCount>0) and (paramcount<=4) then begin
path1:=paramstr(1)+' '+paramstr(2)+' '+paramstr(3)+' '+paramstr(4);
{Я думаю этого достаточно - четыре слова как-никак?}
memo1.lines.loadfromfile(path1); end;
if paramcount>4 then
messagedlg('Программа не поддерживает'#13#10'длинные имена каталогов',mterror, [mbyes],0);
{Но, если все-таки кто-то умудрился создать корявое название, в котором больше четырех слов, тогда вежливо посылаем такого юзера на... - Ему надо, пусть он и берет!}

01.05.2000 Vladimir Ilin

    Меня в принципе смущает вот это:
    Unit1 in 'Unit1.pas' {Form1};
    Как бы сделать без этого..?

04.05.2000 Andy Krasilnikov

Subj: D4.MISC Hужно сделать что-то типа Virtual CD-Rom
Какие компоненты использовать, как сделать так, чтобы появился диск ?

04.05.2000 Dmitriy Kobelev

У кого есть пpогpамма выводящая гpафик

04.05.2000 Андрей

Как из Дельфи 3.0 сделать Дельфи 4.0 и выше ?

04.05.2000 Alex German

требуется или в ручную либо автоматически удалять селую строку в стринггриде
... Как бы это по красивей сделать?


Иконку в system tray (где часы) вставляют функцией Shell_NotifyIcon
Bye ... Тенцер А.Л. tolik@katren.nsk.ru
ICQ 15925834