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

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


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


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

Выпуск № 197
от 04.08.2003, 13:40

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


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

Marouder
Статус: Опытный
Общий рейтинг: 140.93
URL: Первый Хабаровский Форум
Телефон: (4212) 21-93-65
[Подробней >>]
Артём Шегеда
Статус: Профессиональный
Общий рейтинг: 116.79
URL: Пристанище неодинокого программиста
[Подробней >>]
Bob Johnson
Статус: Профессиональный
Общий рейтинг: 151.94
URL: Программирование
[Подробней >>]
 
Zensor_
Статус: Начальный
Общий рейтинг: 109.09
[Подробней >>]
Дима Мусиенко
Статус: Опытный
Общий рейтинг: 109.13
[Подробней >>]
vitya
Статус: Профессиональный
Общий рейтинг: 108.07
[Подробней >>]
 
ART_43
Статус: Доверительный
Общий рейтинг: 125.51
[Подробней >>]
kvINT
Статус: Профессиональный
Общий рейтинг: 104.31
Телефон: (34316)2-31-45
[Подробней >>]
Vdr
Статус: Опытный
Общий рейтинг: 112.17
[Подробней >>]


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

Вопрос № 810. Ребята подскажите как будет выгладеть ассемблерный код function My(buff: PChar; Count: Dword): Dword... (ответов: 3)
Вопрос № 811. Здраствуйте, Коллеги Эксперты. Не знаете ли где в интернете можно откопать хорошую книгу по теме &qu... (ответов: 4)
Вопрос № 812. Здравствуйте эксперты! Помогите с кодом, может у кого есть. Нужно разложить караоке файл (*.kar) на ... (ответов: 1)
Вопрос № 814. Привет всем, как в Delphi можно сделать exe файл, который бы исполнял в командном строке напр. my... (ответов: 3)
Вопрос № 815. Здравствуйте ув. эскперты! Нужно сделать следующее: При открытии приложения должно появится окошко к... (ответов: 3)
Вопрос № 816. Здравствуйте, уважаемые эксперты! Подпкажите пожалуйста, как можно перебрать поочерёдно все записи в... (ответов: 1)

Вопросов: 6, ответов: 15


 Вопрос № 810

Ребята подскажите как будет выгладеть ассемблерный код
function My(buff: PChar; Count: Dword): Dword; assembler
begin
{
Здесь нужно пробежаться и допустим просчитать сумму
в buff[1] .. buff[Count]
а в buff[Count+1]- buff[Count+4] засунуть эту сумму Dword только байты не перевёрнутые
И её же засунуть в result.
}
end;
Заранее благодарен.
Игорь.



Вопрос отправлен: 30.07.2003, 18:17
Отправитель: Игорь (igor@dja.sf.ukrtel.net)

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

Отвечает Marouder

Доброе время суток, Игорь!
Легко, смотри в приложении. На полную оптимизацию не претендует, в асме я не спец, но работает.


Приложение:

Ответ отправлен: 31.07.2003, 03:47
Отправитель: Marouder


Отвечает Артём Шегеда

Добрый день, Игорь!
Если считать, что расчёт идёт для Count элементов, начиная с buff[0] (что логичнее, чем с buff[1]), то код выглядит так:
asm
mov ebx, buff
mov ecx, Count
xor eax, eax
xor edx, edx
@@loop:
mov dl, [ebx]
add eax, edx
inc ebx
loop @@loop
mov cl, 4 //
@@shift: // этот фрагмент
ror edx, 8 // "переворачивает"
rol eax, 8 // рузультат
mov dl, al //
loop @@shift //
mov [ebx], edx
end;


Ответ отправлен: 30.07.2003, 20:00
Отправитель: Артём Шегеда


Отвечает Bob Johnson

Здравствуйте, Игорь!

push esi
xor edx, edx
mov esi, [buff]
xor eax, eax
mov ecx, [Count]
@@1:
mov dl, [esi]
inc esi
add eax, edx
dec ecx
jnz @@1
mov [esi], eax
mov [Result], eax
pop esi

* EMan1.5: ---===*** The hell we've created ourselves ***===---


Ответ отправлен: 31.07.2003, 13:14
Отправитель: Bob Johnson


 Вопрос № 811

Здраствуйте, Коллеги Эксперты.
Не знаете ли где в интернете можно откопать хорошую книгу по теме "Direct3D-графика в Delphi"? Или может у кого есть информация на эту тему?



Вопрос отправлен: 30.07.2003, 19:12
Отправитель: URiS (urisff@inbox.ru)

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

Отвечает Marouder

Здравствуйте, URiS!
Самому бы тоже нужно. :) Только вот где найти. А инфы в сети полно - но она какая-то разрозненная, нужно бы книгу, где собрано все нужное.


Ответ отправлен: 31.07.2003, 02:57
Отправитель: Marouder


Отвечает Zensor_

Здравствуйте, URiS!
firststeps.ru
в разделе для dx3D.

Ответ отправлен: 31.07.2003, 08:18
Отправитель: Zensor_


Отвечает Дима Мусиенко

Добрый день, URiS!
Хорошошую книжку, увы, посоветовать немогу, я под OpenGL пишу. А пару сайтов хороших могу сакзать, впрочем может ты их и знаешь.


Приложение:

Ответ отправлен: 31.07.2003, 09:31
Отправитель: Дима Мусиенко


Отвечает Bob Johnson

Здравствуйте, URiS!
Копай в сторону DirectX SDK. Все функции будут теме же, только придется со структурами повозиться. В этом плане лучше - Bulder, т.к. к нему можно h файлы подключить. А еще лучше VC++, т.к. тебе все равно никакой стандартный интерфейс не нужен, раз ты D3D хочешь использовать - все равно надо будет самому его делать.

* EMan1.5: ---===*** The hell we've created ourselves ***===---


Ответ отправлен: 31.07.2003, 13:17
Отправитель: Bob Johnson


 Вопрос № 812

Здравствуйте эксперты!
Помогите с кодом, может у кого есть.
Нужно разложить караоке файл (*.kar) на 3 -
миди, текст и синхроданные.
Буду очень признателен за любую помощь.
С ув. Игорь
igor@dja.sf.ukrtel.net



Вопрос отправлен: 30.07.2003, 19:29
Отправитель: Маринин Игорь

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

Отвечает Bob Johnson

Добрый день, Маринин Игорь!
Поищи в интернете какой-либо midi конвертер. Я недавно такой видел, но не помню, где, т.к. искал совсем другое.

* EMan1.5: ---===*** The hell we've created ourselves ***===---


Ответ отправлен: 31.07.2003, 13:20
Отправитель: Bob Johnson


 Вопрос № 814

Привет всем,
как в Delphi можно сделать exe файл, который бы исполнял в командном строке напр.
myfile.exe param_1 param_2
или подскажите где найти информацию.
Спасибо.



Вопрос отправлен: 01.08.2003, 00:24
Отправитель: GASTON (gaston@gol.ge)

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

Отвечает vitya

Доброе время суток, GASTON!
используйте функции ShellExecute(Ex), WinExec, CreateProcess на ваше усмотрение.

Ответ отправлен: 01.08.2003, 08:37
Отправитель: vitya


Отвечает ART_43

Добрый день, GASTON!
ShellApi.ShellExecute(0,PChar('open'),PChar(path+'myfile.exe'),PChar('param_1 param_2'),nil,SW_SHOW);

Ответ отправлен: 01.08.2003, 10:22
Отправитель: ART_43


Отвечает Bob Johnson

Добрый день, GASTON!
Чтобы запустить другую программу можно использовать CreateProcess или WinExec. Чтобы выполнять команды, типа cd, md, и т.д. необходимо вызвать командный интерпретатор (command.com под windows98, cmd.exe под Win XP).

* EMan1.5: ---===*** The hell we've created ourselves ***===---


Ответ отправлен: 01.08.2003, 10:49
Отправитель: Bob Johnson


 Вопрос № 815

Здравствуйте ув. эскперты!
Нужно сделать следующее:
При открытии приложения должно появится окошко критической ошибки с характерным звуком (который настроен в винде для крит. ошибки) и текстом "Текст ошибки"
Подскажите, как бы это все провернуть...
В delphi я ламо (см.ник ;)), если можно, поподробней
Заранее спасибо...



Вопрос отправлен: 01.08.2003, 11:03
Отправитель: lamo (devil666@menja.net)

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

Отвечает ART_43

Добрый день, lamo!
MessageBeep(MB_ICONERROR);
MessageDlg('Ошибка', mtError, [mbOK], 0);

Ответ отправлен: 01.08.2003, 14:52
Отправитель: ART_43


Отвечает kvINT

Добрый день, lamo!
В обработчике события onShow своей главной формы напиши
beep;
ShowMessage('текст ошибки')

Ответ отправлен: 03.08.2003, 09:46
Отправитель: kvINT


Отвечает Vdr

Приветствую Вас, lamo!
ShowMessage("текст ошибки");

Ответ отправлен: 02.08.2003, 11:26
Отправитель: Vdr


 Вопрос № 816

Здравствуйте, уважаемые эксперты!
Подпкажите пожалуйста, как можно перебрать поочерёдно все записи в таблице базы данных, занося при переборе одно из полей таблицы(ToMailsend) с структуру, определённую как
tupedef struct
{
AnsiString Namefile;
AnsiString ToMailsend;
} Rec;
Таблица базы данных - DBF-файл формата FoxPro




Вопрос отправлен: 01.08.2003, 12:51
Отправитель: Alexandr (balex@mail.spbnit.ru)

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

Отвечает ART_43

Доброе время суток, Alexandr!
Примерно вот так

Приложение:

Ответ отправлен: 01.08.2003, 15:01
Отправитель: ART_43



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

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

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

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

Ваше имя:

Ваш e-mail:

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


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

Ваш вопрос:


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


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


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

Программисту
Assembler (35)
C / C++ (23)
Perl (3)
Builder / Delphi (20)
Pascal (23)
Basic / VBA (13)
Java / JavaScript (10)
PHP (9)
Криптография (8)
WinAPI (14)
Пользователю
Windows 95/98/Me (48)
Windows NT/2000/XP (51)
"Железо" (40)
Поиск информации (27)
Администратору
Windows NT/2000/XP (27)
Linux / Unix (11)
Юристу
Гражданское право (10)
Семейное право (6)
Трудовое право (7)
КоАП (5)

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




Задать вопрос | Регистрация эксперта | Поиск в базе | Чат | Форумы | Новости
Проект экспертов RusFAQ.ru | Фотоальбом | Virus.RusFAQ.ru | Администрирование
Профессиональная WEB-Студия B.I.T.


Яндекс цитирования
© 2001-2003 Россия, Москва. Авторское право: Калашников О.А.

http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное