Пьяный дельфин 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