Модераторы: Poseidon, Snowy, bems, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Еще несколько вопросов... 
:(
    Опции темы
Borland_Delphi_6
  Дата 6.7.2004, 17:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20
Я конечно понимаю, что один топик - один вопрос, но чтобы особо не флудить... rolleyes.gif
1. Есть ли в мире что-то похожее на модул Jpeg, тока по-легче? Желательно намного легче... hmmm.gif
2. Есть ли какая-то функция WinAPI, аналог ExtractFilePath
3. Можно ли как-то без использования модуля Dialogs выполнить подобие ShowMessage?

baaa.gif

Это сообщение отредактировал(а) Borland_Delphi_6 - 6.7.2004, 17:32


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
_hunter
Дата 6.7.2004, 18:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98
3.
Код

int MessageBox(
   HWND hWnd, // handle of owner window
   LPCTSTR lpText, // address of text in message box
   LPCTSTR lpCaption, // address of title of message box  
   UINT uType  // style of message box
  );



--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Borland_Delphi_6
Дата 6.7.2004, 19:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20
_hunter
Спасибо, катит thumbs-up.gif


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
RA
Дата 6.7.2004, 20:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: 14
Всего: 115
2.

Код

function ExtractFilePath( const Path : String ) : String;
function __DelimiterLast( Str: PChar; Delimiters: PChar ): PChar;
var
   P, F : PChar;
begin
 P := Str;
 Result := P + StrLen( Str );
 while Delimiters^ <> #0 do
 begin
   F := StrRScan( P, Delimiters^ );
   if F <> nil then
   if (Result^ = #0) or (Integer(F) > Integer(Result)) then
      Result := F;
   Inc( Delimiters );
 end;
end;
var P, P0: PChar;
begin
 P0 := PChar( Path );
 P := __DelimiterLast( P0, ':\' );
 if P^ = #0 then
   Result := ''
 else
   Result := Copy( Path, 1, P - P0 + 1 );
end;
PM   Вверх
_hunter
Дата 6.7.2004, 20:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98
сорри за офтоп, но прикольная функция WinAPI smile.gif


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Borland_Delphi_6
Дата 6.7.2004, 21:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20
RAdmin
Спасибо, попробую.

_hunter
Какая?


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
_hunter
Дата 6.7.2004, 21:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98
приведенная RAdmin' ом smile.gif



--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
December
Дата 6.7.2004, 22:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 8
Всего: 57
Цитата
Есть ли в мире что-то похожее на модул Jpeg, тока по-легче? Желательно намного легче...

В смысле? Куда уж легче?!


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
Borland_Delphi_6
Дата 6.7.2004, 22:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20
December
Э-э-э... Я имел ввиду размер модуля... Неохота тащить 200 кб с собой sad.gif

_hunter
Ага, она из SysUtils выдрана smile.gif


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
RA
Дата 7.7.2004, 02:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: 14
Всего: 115
Цитата(_hunter @ 6.7.2004, 20:07)
сорри за офтоп, но прикольная функция WinAPI smile.gif

А шо не тек ? В винАпи Нет Прямой процедуры ExtFPath, чё поделаешь thumbs-up.gif
PM   Вверх
Borland_Delphi_6
Дата 7.7.2004, 11:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20
Ну а насчет jpega кто нить что нить знает? Самая основная проблема sad.gif Сейчас прога на API менее 20 кб, а с модулем jpeg - уже 250 sad.gif sad.gif sad.gif


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
RA
Дата 7.7.2004, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: 14
Всего: 115
Цитата(Borland_Delphi_6 @ 6.7.2004, 22:50)
_hunter
Ага, она из SysUtils выдрана  smile.gif

Ничёго подпбного, прешите батенька.


ЗЫ: Хотьбы сравнил их для начала.

Это сообщение отредактировал(а) RAdmin - 7.7.2004, 16:13
PM   Вверх
Borland_Delphi_6
Дата 7.7.2004, 16:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


LoneLINEss
****


Профиль
Группа: Участник Клуба
Сообщений: 2509
Регистрация: 5.11.2002
Где: in fortune dreams ...

Репутация: нет
Всего: 20
Ну, нет так нет, но с первого взгляда похоже smile.gif Извиняюсь


--------------------
Blind Guardian Fan :: BMSTU Student :: A polar bear is a rectangular bear after a coordinate transform.

Мои фотографии
PM MAIL WWW   Вверх
dvamaster
Дата 7.7.2004, 16:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 559
Регистрация: 30.6.2004
Где: Россия : Курган

Репутация: 3
Всего: 10
Про JPEG могу посоветовать заглянуть в исходник плугина от TotalCommander'а.

Зовется, вроде, avi.wcx...

Там можно, подглядеть как открыть ентот самый JPEG.

Всего несколько строк с WinAPI'шными функциями.

Если надо постучись: [email protected]


--------------------
Хорошую информацию трудно добыть. Сделать с ней что-нибудь - еще труднее. /L. Skywalker/

Что же я сделал не так? /Король Лир/

Я делаю это для твоего же блага! /Любой родитель и палач/

PKUNZIP.ZIP /неизвестный/
PM MAIL WWW ICQ   Вверх
RA
Дата 7.7.2004, 16:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Брутальный буратина
****


Профиль
Группа: Участник Клуба
Сообщений: 3497
Регистрация: 31.3.2002
Где: Лес

Репутация: 14
Всего: 115
Да кстати насчёт jpeg, можно вместо него использовать BMP при поддержке Zlib

Это сообщение отредактировал(а) RAdmin - 7.7.2004, 16:51
PM   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0525 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.