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

Мастера DELPHI. Новости мира компонент, FAQ, статьи...

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Delphi - проблемы и решения" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Декабрь 2001   →
 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
Автор
Сергей

Статистика

13.577 подписчиков
-18 за неделю
←   Все выпуски   →

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Служба Рассылок Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 06.12.01 09:04

Кое-что из нашей кладовки   |x|
  • TMultiProperty Рустам rustamkafarov.@hotmail.com   (05.12.01 11:39)
    Компонент для создания мультиязычных и мультиинтерфейсных приложений. Позволяет изменять ВСЕ свойства ВСЕХ компонентов скомпилированного приложения, без изменения EXE-файла. Особенность заключается в том, что конечный пользователь сам сможет осуществлять перевод интерфейса приложения.
    »»» Скачать: исходные тексты (393кб) демонстрационный EXE файл (183кб) посмотреть скриншот
Лучшее из нашего FAQ   |x|
Как получить длинное имя файла или каталога, зная короткое имя?
Используйте Win32_Find_Data поле TSearchRec.
Пример:

     procedure TForm1.Button1Click(Sender: TObject);
     var
       SearchRec : TSearchRec;
       Success : integer;
     begin
       Success := SysUtils.FindFirst('C:\DownLoad\dial-u~1.htm',
                     faAnyFile,
                     SearchRec);
       if Success = 0 then begin
     ShowMessage(SearchRec.FindData.CFileName);
       end;
       SysUtils.FindClose(SearchRec);
     end;


Источник: Дельфи. Вокруг да около.

И пример от Andrey Klimov 

function ShortToLongPath(const ShortName: string): string;
var
  LastSlash: PChar;
  TempPathPtr: PChar;
  strTmp: string;
begin
  Result := '';
  TempPathPtr := PChar(ShortName);
  LastSlash := StrRScan(TempPathPtr, '\');
  while LastSlash <> nil do begin
    strTmp := ShortToLongFileName(TempPathPtr);
    if strTmp <> '' then
    begin
       Result := '\' + strTmp + Result;
       if LastSlash <> nil then begin
         LastSlash^ := char(0);
         LastSlash := StrRScan(TempPathPtr, '\');
       end;
    end
    else
        LastSlash := nil;
  end;
  Result := TempPathPtr + Result;
end;


»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Cоветы по Delphi
На сайте достаточно часто можно услышать вопросы общей направленности, повторяющиеся не по одному разу... Чтобы частично разгрузить форум и чат сайта, решено было написать данную подборку вопросов.
Новинки книжного рынка   |x|
Самоучитель Kylix
Книга посвящена новому продукту фирмы Borland - объектно-ориентированной среде для быстрой разработки приложений под Linux. Рассматривается версия Kylix 1.0 Server Developer.
Приводятся приемы работы с графическими компонентами, принципы создания приложений баз данных и собственных компонентов.
Дается краткое описание языка программирования Object Pascal. Последняя часть книги посвящена проблеме создания межплатформенных приложений, которые работают как в среде Linux, так и в Windows.
Изложение сопровождается многочисленными примерами и фрагментами кода.Для программистов
Автор: Понамарев В.
Другие сайты о DELPHI   |x|
Русификация Delphi 5 Update Pack 1
Русификация Delphi 5 & Delphi 5 Update Pack 1 + несколько примеров программ + форум
Опрос населения :)
Как часто вы заглядываете на наш сайт?
»»» Регулярно
»»» Раз в неделю
»»» Когда нужна помощь
»»» По почтовой рассылке
»»» Сделал стартовой страницей
Журнал "Мастера DELPHI"  |x|
Давно витающая в воздухе нашего сайта идея создания журнала, посвященного всеми нами любимой среде разработки Delphi, похоже, обретает зримую форму. Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
Для души

Хокку дня
Игрушечным шаром
Упало светило --
Осколки блестят.

Афоризмы
Сам по себе муравей - существо мудрое, но саду он враг...(Ф.Бэкон)

Фраза дня
Кулер тоже вертолет. Только маленький еще.

И на закуску коротенький анекдот
Почему деньги фальшивые?.. это копии ...заверенные нотариусом.

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=0798

На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное