|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Delphi - Delphi .: [все вопросы] :. |
|
Delphi - Delphi .: [все вопросы] :.
|
Ветеран Сообщения: 1133 |
Профиль | Отправить PM | Цитировать
Delphi Предлагаю в данной теме, обсуждать все вопросы связанные с этим языком программирования. Полезные инструменты:
new! Delphi-“вирус”: проверьте свою установленную Delphi! - эта статья о весьма простом, написанном на Delphi, саморазмножающемся коде, который иначе как “вирусом” назвать нельзя. Особенность его в том, что он поражает только установленные Delphi версий 4-7 (включительно), так что любая программа, скомпилированная в “поражённых” Delphi, будет содержать в себе копию этого вредоносного кода и заражать любые другие найденные Delphi. |
|
------- Отправлено: 13:15, 03-02-2009 |
Ветеран Сообщения: 1133
|
Профиль | Отправить PM | Цитировать Здравствуйте, как добавить в ListView данные, т.е. в первую колонку данные из Edit, во вторую данные в зависимости от выбора в ComboBox?
Вопрос решён! |
------- Последний раз редактировалось Serega, 23-02-2009 в 13:15. Отправлено: 22:55, 21-02-2009 | #21 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Новый участник Сообщения: 5
|
Профиль | Отправить PM | Цитировать Здравствуйте DillerInc, понимаю в чужом коде разбираться трудно. Но не могу понять своих ошибок, если не затруднить хотя бы наведите на какую-нибудь мысль:
function shifr(N1, N2:string): String; var KZU: string[32]; Temp: string[4]; R:string; i:integer; table: array [0..7] of integer; begin asm xor esi, esi mov ecx, 24 @cycle1: push ecx ……………………………….. mov ecx, 4 mov ebx, 3 clc @SM1: mov al, byte ptr KZU[esi+ebx] // Ошибка: Invalid register combination adc byte ptr Temp[ebx], al dec ebx loop @SM1 end; table:=KBlock(Temp); // Ошибка: Incompatible types: 'Array' and 'Integer' R:=ShiftR11(Temp); …………………………………… asm add esi, 4 pop ecx loop @cycle1 end; end; --------------------------------------------------------- function KBlock(Temp:string): array[0..7] of Integer; // Ошибка: Identifier expected but 'ARRAY' found var str, stb:array[1..8] of integer; i:integer; begin asm mov ecx, 4 xor esi, esi xor ebx, ebx @cycle1: mov al, byte ptr Temp[ebx] and al, 00001111 //Ошибка: Operand size mismatch mov byte ptr str[esi], al mov byte ptr stb[esi], esi // Ошибка: Operand size mismatch inc esi mov al, byte ptr Temp[ebx] and al, 11110000 // Ошибка: Operand size mismatch mov byte ptr str[esi], al mov byte ptr stb[esi], esi // Ошибка: Operand size mismatch inc esi inc ebx loop @cycle1 end; for i:=0 to 7 do result[i]:=StrToInt(ShifrZamForm2.StringGrid1.Cells[str[i], stb[i]]); // Ошибка: Array type required end; |
Отправлено: 15:10, 22-02-2009 | #22 |
Новый участник Сообщения: 5
|
Профиль | Отправить PM | Цитировать Здравствуйте! Да некоторые ошибки оказались вообще детскими, выспалась, уже некоторые исправила, но как быть в этом случае, где есть ошибки, заменить на просто bx не идёт, пожалуйста подскажите:
|
Отправлено: 11:34, 23-02-2009 | #23 |
Обратный инженер Сообщения: 644
|
Профиль | Отправить PM | Цитировать shynar, значит так:
...подобная связка не поддерживается ассемблером Intel x86 при вычислении эффективного адреса.Вам нужно читать какой-то мануал,раз вы уже так взялись за это дело,а не пытаться что-то вслепую тыкать: Цитата masm32 help:
|
|
------- Отправлено: 11:54, 23-02-2009 | #24 |
Новый участник Сообщения: 5
|
Профиль | Отправить PM | Цитировать Здравствуйте! как будет выглядет объявление переменной (ассемблерная) в делфи?
K8K7 db 1DH, 1BH, 14H, 11H, и т.д до 256 байт К6К5 db FDh, FBH, F4H,... и т.д. до 256 байт К4К3 db DDh, DBH, D4H,... и т.д. до 256 байт |
Отправлено: 10:24, 26-02-2009 | #25 |
Пользователь Сообщения: 70
|
Профиль | Отправить PM | Цитировать Так а мне кто-нибудь все же поможет или нет? Я чуть раньше спрашивал.
|
Отправлено: 15:09, 26-02-2009 | #26 |
Новый участник Сообщения: 1
|
Профиль | Отправить PM | Цитировать как можно считать частоту с (входа)микрофона и вывести в Edit ili Label
|
Отправлено: 18:12, 28-02-2009 | #27 |
Ветеран Сообщения: 7109
|
Профиль | Отправить PM | Цитировать skinail, насколько я помню из университетского курса, быстрым преобразованием Фурье . Точнее, так получается спектр сигнала, а если этот сигнал "монохромный" (одна частота) - получим прямо эту частоту.
ссылочка на пример реализации |
------- Отправлено: 18:45, 28-02-2009 | #28 |
Ветеран Сообщения: 1133
|
Профиль | Отправить PM | Цитировать Здравствуйте, добавил в раздел Полезные инструменты, ссылку на удобный редактор кода от CnPack, для языков Delphi и C++.
|
------- Отправлено: 17:20, 13-03-2009 | #29 |
Пользователь Сообщения: 70
|
Профиль | Отправить PM | Цитировать |
Отправлено: 15:35, 16-03-2009 | #30 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Steam .:[все вопросы]:. | sertomclancy | Игры | 63 | 16-07-2019 06:19 | |
Антивирусы - Avast! .:[Все вопросы]:. | Guest | Защита компьютерных систем | 137 | 08-02-2016 12:26 | |
Доступ - Никак не удаляются файлы (AVI и все остальные форматы) .:[все вопросы]:. | Microsoft Windows 2000/XP | 105 | 30-06-2010 11:58 | ||
ASP: Все вопросы | XCodeR | Вебмастеру | 62 | 12-08-2008 17:12 | |
Мультимедиа - mp3DirectCut .:[ обсуждение всех версий ]:. | SuperMaximus | Программное обеспечение Windows | 16 | 13-08-2007 16:23 |
|