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

RusFAQ.ru: Программирование на Delphi


Информационный Канал Subscribe.Ru

RusFAQ.ru: Программирование на C++ Builder / Delphi

Выпуск № 396
от 12.10.2004, 13:30

Администратор:
Имя: Калашников О.А.
URL: Информационный ресурс
ICQ: 68951340
Россия, Москва
О рассылке:
Задано вопросов: 1849
Отправлено ответов: 4205
Активность: 227.4 %
[Задать вопрос >>][Регистрация эксперта >>]
[Поиск в базе][Обсудить на форуме]


 Список экспертов, ответы которых опубликованы в данном выпуске

sir henry
Статус: Профессиональный
Общий рейтинг: 163.3
[Подробней >>]
THE_PRO
Статус: Профессиональный
Общий рейтинг: 133.37
URL: THE_PRO
[Подробней >>]
Boriss
Статус: Профессиональный
Общий рейтинг: 157.18
URL: Программирование на Паскале
[Подробней >>]
 
CJ
Статус: Профессиональный
Общий рейтинг: 118.5
URL: Персональный сайт Каратецкого Кирилла.
Телефон: +375297353706
[Подробней >>]


 Краткий перечень вопросов

Вопрос № 1838. Уважаемые эксперты, подскажите, как мне из Win32 программы записать RAW-образ дискеты из файла непос... (ответов: 3)
Вопрос № 1839. Можно ли как-нибудь проект написанный на C++Builder переделать на Delphi.... (ответов: 2)
Вопрос № 1840. Здравствуйте! Как проиграть mp3 файл в delphi, Не используя левых компонентов? И чтобы потом приложе... (ответов: 3)
Вопрос № 1841. Уважаемые эксперты! Вопрос простой! Как сделать, чтобы форма не меняла размер? Спасибо Всем за ответ... (ответов: 2)
Вопрос № 1842. Приветствую. По поводу вопроса № 1831. Сергей, для того, чтобы выполнилось создание таблицы, надо в... (ответов: 1)

Вопросов: 5, ответов: 11


 Вопрос № 1838

Уважаемые эксперты, подскажите, как мне из Win32 программы записать RAW-образ дискеты из файла непосредственно на дискету?
В NT-системах вроде бы можно обращаться к диску как к файлу, но мне нужен универсальный способ, работающий и в Win9x.
Любые исходники приветствуются.



Вопрос отправлен: 08.10.2004, 06:40
Отправитель: Blackman

[Следующий вопрос >>] [Список вопросов]

Отвечает sir henry

Приветствую Вас, Blackman!
С помощью функции ShellExecute(), вызвать программу записи этих самых образов. rawrite, например. Это самый универсальный способ.

Ответ отправлен: 08.10.2004, 09:40
Отправитель: sir henry


Отвечает THE_PRO

Доброе время суток, Blackman!
Pomoyemu takix universalnix metodov net.
Poskolku vsudu qde ya ne iskal bi vezde
tverdat odno: "WinNT is not Win9x" i nooborot.

Ответ отправлен: 08.10.2004, 13:32
Отправитель: THE_PRO


Отвечает Boriss

Доброе время суток, Blackman!
Описание формата (а именно это Вам нужно) можно найти на
http://infocity.kiev.ua/graf/content/graf105_1.phtml
(этот формат используется в цифровой фотографии)

Ответ отправлен: 09.10.2004, 11:01
Отправитель: Boriss


 Вопрос № 1839

Можно ли как-нибудь проект написанный на C++Builder переделать на Delphi.



Вопрос отправлен: 08.10.2004, 12:10
Отправитель: Neo (tehneo@mail.nnov.ru)

[Следующий вопрос >>] [Список вопросов]

Отвечает sir henry

Доброе время суток, Neo!
Теоретически можно, если там использованы стандартные компоненты. Дело встанет за синтаксисом и небольшим различием в Дельфи и Билдере. Например #define не имееи четкой аналогии в Дельфи. В одних случаях это будет константа, а в других уже процедура.
Различаются так-же используемые типы данных в процедурах и функцией. Поэтому нужно внимательно посмотреть в исходниках Дельфи, как там реализована та или иная функция, например:
Билдер:
WNetUseConnectionA(
IN HWND hwndOwner,
IN LPNETRESOURCEA lpNetResource,
IN LPCSTR lpUserID,
IN LPCSTR lpPassword,
IN DWORD dwFlags,
OUT LPSTR lpAccessName,
IN OUT LPDWORD lpBufferSize,
OUT LPDWORD lpResult
);
Дельфи:
WNetUseConnection(hwndOwner: HWND;
var lpNetResource:
TNetResource;
lpUserID: PChar;
lpPassword: PChar;
dwFlags: DWORD;
lpAccessName: PChar;
var lpBufferSize: DWORD;
var lpResult: DWORD):
В Билдере идет указатель на DWORD, а в Дельфи DWORD непосредственно.

Ответ отправлен: 08.10.2004, 13:10
Отправитель: sir henry


Отвечает Boriss

Приветствую Вас, Neo!
Ну конечно! Берешь и пишешь по-дельфийски все, что написано на Builder'e :))
А можно и заказать кому-нибудь сделать это.
Но есть, конечно, и варианты, если широко используются библиотеки... - то можно переделать библиотечные функции. Тут, практически, одно и то же, только другими словами. А сам проект можно и не трогать

Ответ отправлен: 08.10.2004, 12:25
Отправитель: Boriss


 Вопрос № 1840

Здравствуйте!
Как проиграть mp3 файл в delphi,
Не используя левых компонентов?
И чтобы потом приложение работало на всех wind-aх
Спасибо, всем пока!



Вопрос отправлен: 08.10.2004, 14:41
Отправитель: STALS

[Следующий вопрос >>] [Список вопросов]

Отвечает sir henry

Добрый день, STALS!
Вы слишком много хотите. :)
В Delphi нет стандартных компонентов для проигрывания мр3, а левые Вы не хотите. Узость мышления - одна из проблем современности. :)


Ответ отправлен: 11.10.2004, 08:15
Отправитель: sir henry


Отвечает Boriss

Приветствую Вас, STALS!
ShellExecute(0, 'open', 'file.mp3', nil, nil, SW_SHOWNORMAL);
Запускается зарегистрированное для данного расширения приложение (то, что надо Вам)


Ответ отправлен: 08.10.2004, 16:12
Отправитель: Boriss


Отвечает CJ

Здравствуйте, STALS!
Компонент Mediaplaer поможет тебе. Он не левый кстати :)

Ответ отправлен: 08.10.2004, 22:14
Отправитель: CJ


 Вопрос № 1841

Уважаемые эксперты!
Вопрос простой! Как сделать, чтобы форма не меняла размер?
Спасибо Всем за ответы!
(Ламер)



Вопрос отправлен: 08.10.2004, 14:58
Отправитель: Sudba

[Следующий вопрос >>] [Список вопросов]

Отвечает sir henry

Здравствуйте, Sudba!
Присвоить TForm.BorderStyle одно из следующих значений:
bsDialog; Not resizable; standard dialog box border
bsSingle; Not resizable; single-line border
bsNone; Not resizable; no visible border line
Как видно из комментариев, ни одно из них не позволяет менять размер, по крайней мере мышкой. :)

Ответ отправлен: 11.10.2004, 08:18
Отправитель: sir henry


Отвечает Boriss

Добрый день, Sudba!
Если просто, то обрабатывайте событие OnCanResize:
procedure TForm1.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean);
Просто устанавливайте Resize:=False;


Ответ отправлен: 08.10.2004, 16:02
Отправитель: Boriss


 Вопрос № 1842

Приветствую.
По поводу вопроса № 1831.
Сергей, для того, чтобы выполнилось создание таблицы, надо
вместо Q.Open использовать Q.ExecSQL, так как Open пытается создать курсор. А курсор нужет, только если ты делаешь выборку из БД.

P.S. Пробелы не влияют на выполнение запроса.
И sir henry, Form1 не является образцом, а является владельцем созданного компонента.
P.P.S. Убедительная просьба к экспертам, не вводите в заблуждение народ.
С уважением VM.



Вопрос отправлен: 08.10.2004, 16:35
Отправитель: VM

[Следующий вопрос >>] [Список вопросов]

Отвечает sir henry

Доброе время суток, VM!
Приношу свой большой пардон за дезинформацию. :)
Там ошибка была действительно в том, что не создавался курсор и необходимо применять Execsql.

Ответ отправлен: 11.10.2004, 10:17
Отправитель: sir henry



Форма отправки вопроса

Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.

(C) 2002-2003 Команда RusFAQ.ru.

 Персональные данные

Ваше имя:

Ваш e-mail:

Опубликовать мой e-mail в рассылке


 Вопрос и дополнение

Ваш вопрос:


Приложение (если необходимо):


Получить ответов:


 Выбор рассылки

Программисту
Assembler (27)
C / C++ (17)
Perl (7)
Builder / Delphi (17)
Pascal (20)
Basic / VBA (9)
Java / JavaScript (8)
PHP (19)
Криптография (9)
WinAPI (14)
Радиоэлектроника (16)
Пользователю
Windows 95/98/Me (43)
Windows NT/2000/XP (60)
"Железо" (38)
Поиск информации (22)
Администратору
Windows NT/2000/XP (41)
Linux / Unix (17)
Юристу
Гражданское право (7)
Семейное право (4)
Трудовое право (6)
КоАП (5)

Отправить вопрос всем экспертам выбранной рассылки.





http://subscribe.ru/
http://subscribe.ru/feedback/
Подписан адрес:
Код этой рассылки: comp.soft.prog.delphiplus
Отписаться

В избранное