Уважаемые эксперты, подскажите, как мне из Win32 программы записать RAW-образ дискеты из файла непосредственно на дискету? В NT-системах вроде бы можно обращаться к диску как к файлу, но мне нужен универсальный способ, работающий и в Win9x. Любые исходники приветствуются.
Приветствую Вас, 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.
Доброе время суток, 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х Спасибо, всем пока!
Добрый день, 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
Уважаемые эксперты! Вопрос простой! Как сделать, чтобы форма не меняла размер? Спасибо Всем за ответы! (Ламер)
Здравствуйте, 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.
Доброе время суток, VM! Приношу свой большой пардон за дезинформацию. :) Там ошибка была действительно в том, что не создавался курсор и необходимо применять Execsql. Ответ отправлен: 11.10.2004, 10:17 Отправитель: sir henry
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.