Вопрос по TThread.
Здравствуйте. Есть вопрос, может кто сталкивался. Есть поток TThread в программе, работающий с бд. С помощью Synchronize на главную форму из него передается информация о ходе выполнения. В этом же модуле присутствует еще один класс для работы с CSV файлами. При его работе тоже надо передать информацию на главную форму. Но для этого классаметод Synchronize не работает, так как это обычный класс, а не TThread. Как корректно передать данные из него на главную форму? Можно ли вызвать метод потока? Спасибо всем кто откликнется.
Пожалуйста, помогите написать прогу в паскале..=)
Вычисление произведения последовательно вводимых чисел. Определить максимальный по модулю элемент.
Остановить обработку при вводе признака конца-
число из диапазона от -5 до 5.(включительно)
Тип обработки данных-целые.
Остановить обработку при вводе признака конца-
число из диапазона от -5 до 5.(включительно)
Тип обработки данных-целые.
Глеб Временный,
20-12-2010 17:42
(ссылка)
подскажите пожалуйста по паскалю)
Задана целочисленная квадратная матрица размером n*n. Написать программу, преобразующую исходную матрицу по правилу: начетные столбцы разделить на среднее значение диагональных элементов матрицы, а четные оставить без изменения.
Как это решить.. подскажите пожалуйста))Заранее спасибо))
Как это решить.. подскажите пожалуйста))Заранее спасибо))
подскажите пожалуйста)))
как в паскале просчитать такой факториал a=(2n-1)! ???
Думаю пригодится:)
Продам свои произведения:
Trojan Downloader
(Скачивает файлы из интернета без ведома пользователя и запускает их!!)
Trojan info
(Присылает на емайл адрес файл паролей майл агента+ Захват экрана откуда был запущен + полную инфу о компе вот пример:
Ip адреса: (1-локалка, 2-Интернет!!!)
10.37.0.78
92.122.85.55
Пользователь:Admin
Имя компа:Comp
%windir%:C:\WINDOWS
C:C: 198459,20mb. Свободно: 154731,88mb.
D:
E:E: 198459,20mb. Свободно: 154731,88mb.
F:
G:
Мак адресс:99-E6-BS-71-B4-20
Расширение экрана:1440 x 900
Common files:C:\Program Files
HDD Number:2964396647
Dir Program Files:C:\Program Files
Оперативка:2 096 232 KB
Операционная система: Microsoft Windows XP
Id продукта: 76356-640-1464557-23412
Программный фейк:
Выкладываю скрины:
1) http://s005.radikal.ru/i210/1010/11/5dafe4d5c4d3.jpg
2) http://s39.radikal.ru/i086/1010/47/913b459017a0.jpg
Винлокер:
+ Ничем не палится (по крайней мере известными антивирями)
+ Блокирует безопасный режим
+ Добавляется в автозагрузку
+ Убрать можно только если ввести определенный код
+ Блокирует диспетчер задач
+ Блокирует реестр
+ Блокирует msconfig
+ Удобный дизайн
+ Полностью блокирует windows
+ Закрывает explorer
+ Если правильно ввести код удалится из автозагрузки и разблокирует вышеперечисленные программы и безопасный
режим
+ Копирует себя в директорию WINDOWS
+ Удалить такой Винлокер будет очень сложно придется использовать LiveСD (еще придется хорошо поискать его) или
просто ввести код
+ Могу сделать любой пароль
+ Любой дизайн
+ Любой размер формы и самого файла
+ Самоудаление после активации
+ Отдам почти даром
+ На таком Винлоке можно не плохо заработать
+ Полностью на весь экран
+ Не даст открыть программы такие как msconfig, regedit, taskmgr, regdt32... Ну и т.п
+ Можно полностью заблокировать безопасный режим! (по желанию)
+ При нескольких неправильных попыток ввода кода Система завершит работу синим экраном смерти! (BSOD)
+ При закрытии снова откроется так что закрыть его тока можно кодом
Выкладываю скрин:
http://s43.radikal.ru/i100/1010/b3/5dbc2101d523.jpg
Ну и еще один троян он ворует историю переписки mail agent
Trojan Downloader
(Скачивает файлы из интернета без ведома пользователя и запускает их!!)
Trojan info
(Присылает на емайл адрес файл паролей майл агента+ Захват экрана откуда был запущен + полную инфу о компе вот пример:
Ip адреса: (1-локалка, 2-Интернет!!!)
10.37.0.78
92.122.85.55
Пользователь:Admin
Имя компа:Comp
%windir%:C:\WINDOWS
C:C: 198459,20mb. Свободно: 154731,88mb.
D:
E:E: 198459,20mb. Свободно: 154731,88mb.
F:
G:
Мак адресс:99-E6-BS-71-B4-20
Расширение экрана:1440 x 900
Common files:C:\Program Files
HDD Number:2964396647
Dir Program Files:C:\Program Files
Оперативка:2 096 232 KB
Операционная система: Microsoft Windows XP
Id продукта: 76356-640-1464557-23412
Программный фейк:
Выкладываю скрины:
1) http://s005.radikal.ru/i210/1010/11/5dafe4d5c4d3.jpg
2) http://s39.radikal.ru/i086/1010/47/913b459017a0.jpg
Винлокер:
+ Ничем не палится (по крайней мере известными антивирями)
+ Блокирует безопасный режим
+ Добавляется в автозагрузку
+ Убрать можно только если ввести определенный код
+ Блокирует диспетчер задач
+ Блокирует реестр
+ Блокирует msconfig
+ Удобный дизайн
+ Полностью блокирует windows
+ Закрывает explorer
+ Если правильно ввести код удалится из автозагрузки и разблокирует вышеперечисленные программы и безопасный
режим
+ Копирует себя в директорию WINDOWS
+ Удалить такой Винлокер будет очень сложно придется использовать LiveСD (еще придется хорошо поискать его) или
просто ввести код
+ Могу сделать любой пароль
+ Любой дизайн
+ Любой размер формы и самого файла
+ Самоудаление после активации
+ Отдам почти даром
+ На таком Винлоке можно не плохо заработать
+ Полностью на весь экран
+ Не даст открыть программы такие как msconfig, regedit, taskmgr, regdt32... Ну и т.п
+ Можно полностью заблокировать безопасный режим! (по желанию)
+ При нескольких неправильных попыток ввода кода Система завершит работу синим экраном смерти! (BSOD)
+ При закрытии снова откроется так что закрыть его тока можно кодом
Выкладываю скрин:
http://s43.radikal.ru/i100/1010/b3/5dbc2101d523.jpg
Ну и еще один троян он ворует историю переписки mail agent
Виктор Макенский,
01-11-2010 15:42
(ссылка)
itbuben
Метки: ItBuben.kz, сообщества, блоги, IT, софт, windows, Linux, компьютеры
задача,кто-нить помогите решить...
Даны натуральные числа M и N. Найти решения всех квадратных уравнений: A*X^2 + B*X - 1 =0, где A=1, 2, ..., M; B =1,2. ..., N.
Нужна помошь в поиске информации...
Помогите нати источник с чего можно было написать контрольную вот по этой теме -"Сформулируйте методы и принципы одноуровневой
зашиты для ОС."
зашиты для ОС."
Важно!! Срочно!!
Народ помогите зделать так чтоб в дельфи программа вывела все числа до 1000в мемо!
0
1
2
3
4
5
6
7
8
..
и вот так вот до 1000
сам пробовал не получается раньше делал а щас не помню как помогите пожалуйста!!
0
1
2
3
4
5
6
7
8
..
и вот так вот до 1000
сам пробовал не получается раньше делал а щас не помню как помогите пожалуйста!!
Toljan ChiMAN,
30-09-2010 08:42
(ссылка)
Где взять трояна?
Ёу! Чуваки! Где можно взять сурсы троянов для Делфи (7)???
Дайте кто нить полный листинг программный код (рабочий) трояна на Делфи, что бы Антивирусами всеми палился.
Напишите ниже список сайтов каких нить нормальных по этой теме.
Дайте кто нить полный листинг программный код (рабочий) трояна на Делфи, что бы Антивирусами всеми палился.
Напишите ниже список сайтов каких нить нормальных по этой теме.
ПОМОГИТЕ ПОЖАЛУЙСТА!СРОЧНО!
Помогите пожалуйста решить несколько задач!
1)Задав одномерный массив из n вещественных или целых
элементов реализовать обработку массива, как указано в варианте. Длина массива N задается пользователем. Исходные
данные задать самостоятельно, учитывая формат элементов массива A.
Исходные данные должны вводиться с проверкой на область допустимых
значений. Тип результата определяется из контекста.
Вариант 11:
1) найти номер минимального по модулю элемента массива;
2) сумму модулей элементов массива, расположенных после
первого отрицательного элемента.
Сжать массив, удалив из него элементы, расположенные в
интервале [a,b].
2)Используя циклические структуры «for», «do-while», «repeat-until» решить задачу,
предложенную в соответствии с вариантом.
Организация вложенных циклов.
Варианты приведены ниже.
вариант 11:
An=(n!)/((2*n-1)!n^n)
1)Задав одномерный массив из n вещественных или целых
элементов реализовать обработку массива, как указано в варианте. Длина массива N задается пользователем. Исходные
данные задать самостоятельно, учитывая формат элементов массива A.
Исходные данные должны вводиться с проверкой на область допустимых
значений. Тип результата определяется из контекста.
Вариант 11:
1) найти номер минимального по модулю элемента массива;
2) сумму модулей элементов массива, расположенных после
первого отрицательного элемента.
Сжать массив, удалив из него элементы, расположенные в
интервале [a,b].
2)Используя циклические структуры «for», «do-while», «repeat-until» решить задачу,
предложенную в соответствии с вариантом.
Организация вложенных циклов.
Варианты приведены ниже.
вариант 11:
An=(n!)/((2*n-1)!n^n)
настроение: Сумасшедшее
Toljan ChiMAN,
18-09-2010 10:32
(ссылка)
Как в Delphi7 добавить (удалить) пользователя?
Как с помощью Delphi7 в Windows XP,Vista,7 добавить (удалить,изменить пароль,отключить) пользователя.
В общем работа с учётными записями пользователей средствами Delphi7.
Как?
Желательно полные примеры с описаниями.
В общем работа с учётными записями пользователей средствами Delphi7.
Как?
Желательно полные примеры с описаниями.
настроение: normal
хочется: узнать ответ на вопрос
слушаю: ничего
Ыы
Продам свое ПО написанное в дельфях! Имеется фейки, трояны вирусы!
Также пишу под заказ любой сложности могу продать программу блокирующую
винду (винлокер, вирус вымогатель) также любой сложности! О цене
договоримся!! Не дороги пишите!!! Жду!!! Оплата происходит на вебмани,
яндекс деньгах, смс, деньги на телефон, майл деньги!!!
Также пишу под заказ любой сложности могу продать программу блокирующую
винду (винлокер, вирус вымогатель) также любой сложности! О цене
договоримся!! Не дороги пишите!!! Жду!!! Оплата происходит на вебмани,
яндекс деньгах, смс, деньги на телефон, майл деньги!!!
Очень важно!!
Народ посоветуйте хороший не дорогой vps или vds сервер!!! Тока чтоб не дорого! Мне 50 мб хватит!
Блокератор виндовс
Продам хороший блокиратор виндовс мной написанный на дельфи пишите в личку если че:) Также продаю множество троянов и вирусов написанных в дельфи или под DOS!!!
Кира Савельева,
26-05-2010 15:59
(ссылка)
Нужна срочно помощь)
Помогите решить задачу...
Дан массив А ненулевых целых чисел размера 10. Вывести значение тех его элементов АК, которые удовлетворяют неравенству АК < А10. Если таких элементов нет, то вывести 0.
Дан массив А ненулевых целых чисел размера 10. Вывести значение тех его элементов АК, которые удовлетворяют неравенству АК < А10. Если таких элементов нет, то вывести 0.
Нужна помощь. Пожалуйста. :)
мне необходимо решить задачки по программированию на паскале, среда дельфи. я щас
пытаюсь что то сама сделать, немножко получается, но не совсем. никак
не могу понять как используются процедуры и функции.
задачки такие: дана целочисленная квадратная матрица. определить,
1 задача. произведение элементов в тех строках, которые не содержат отрицательных элементов (оформить в виде функции)
2 задача. максимум среди сумм элементов диагоналей, параллельных главной диагонали матрицы (оформить в виде процедуры)
если кто-нибудь сможет или решиться:) помочь, могу выслать свои черновики. заранее спасибо, буду очень благодарна.
Кира Савельева,
13-05-2010 13:41
(ссылка)
ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Помогите решить несколько задач)
1. Робот может перемещаться в четырех направлениях
(«С» - север, «З» - запад, «Ю» - юг, «В» - восток) и принимать три цифровые
команды: 0 – продолжать движение, 1 – поворот налево, -1 – поворот направо. Дан
символ С – исходное направление
робота и целое число N – посланная ему команда. Вывести направление
робота после выполнения полученной команды.
2. Элементы окружности пронумерованы следующим
образом: 1 – радиус R, 2 – диаметр D=2*R, 3 – длина L=2*ПИ*R, 4 – площадь круга S=ПИ*R2. Дан номер одного из этих элементов и его
значение. Вывести значение остальных элементов данной окружности (в том же
порядке). В качестве значения ПИ использовать 3.14.
3. Дано целое число N(>0). Если оно является степенью числа 3, то вывести True, если не является – вывести False.
4. Дано натуральное число N,
действительно число X. Вычислить сумму ряда ((i+1)x)/i!
5. Рассчитать сумму бесконечного ряда. Суммирование
проводить, пока очередной член ряда по модулю не станет меньше заданной
точности e. Результат сравнить с известным значением (ST), а погрешность сопоставить с величиной e. ST = 7ПИ4/720, e=10-7
6. Вывести числа от
1 до N. (N/3)<=0.01
1. Робот может перемещаться в четырех направлениях
(«С» - север, «З» - запад, «Ю» - юг, «В» - восток) и принимать три цифровые
команды: 0 – продолжать движение, 1 – поворот налево, -1 – поворот направо. Дан
символ С – исходное направление
робота и целое число N – посланная ему команда. Вывести направление
робота после выполнения полученной команды.
2. Элементы окружности пронумерованы следующим
образом: 1 – радиус R, 2 – диаметр D=2*R, 3 – длина L=2*ПИ*R, 4 – площадь круга S=ПИ*R2. Дан номер одного из этих элементов и его
значение. Вывести значение остальных элементов данной окружности (в том же
порядке). В качестве значения ПИ использовать 3.14.
3. Дано целое число N(>0). Если оно является степенью числа 3, то вывести True, если не является – вывести False.
4. Дано натуральное число N,
действительно число X. Вычислить сумму ряда ((i+1)x)/i!
5. Рассчитать сумму бесконечного ряда. Суммирование
проводить, пока очередной член ряда по модулю не станет меньше заданной
точности e. Результат сравнить с известным значением (ST), а погрешность сопоставить с величиной e. ST = 7ПИ4/720, e=10-7
6. Вывести числа от
1 до N. (N/3)<=0.01
Очень нужна помощь!!
Необходимо реализовать структуру данных. Элемент структуры: комплексное число.
Структура данных: дек.
нужно основные операции реализовать : добавить/удалить в левый/правый край списка, получить значение/ получить размер
Требования к реализации:
1 Для построения класса структуры данных запрещается использовании готовые структуры данных в выбранном для реализации языке программирования (языки Object Pascal и Delphi – классы TCollection, TList, TStack и др.).
2 Для реализации элемента структуры и самой структуры использовать классы с функциональностью, требуемой определением структуры данных.
3 Для размещения данных использовать механизм динамической памяти.
4 Организовать тестирование разработанных классов посредством консольного при-ложения. При выполнении каждой операции класса структуры осуществлять вывод состояния структуры данных на консоль.
Язык паскаль, среда Delphi 7
Татьяна Денисова,
14-01-2010 06:37
(ссылка)
Без заголовка
Привет всем))у кого есть интересные задачки для решения в паскале?желательно с готовыми листингами для самопроверки)))
Алексей Чудинов,
07-01-2010 20:40
(ссылка)
VPI или система визуального программирования.
Система заточена на работу с блок-схемами.
-тупо построение блок схем(типа визео тока все само рисуется выравнивается и тп)
-генерация по коду (Pascal) блок-схем понадобится студентам и школьникам
-построение блок схемы на конкретном языке (паскаль например) возможность ее откомпилировать(да откомпилировать блок схему) сгенерировать код и получить готовый exe-шник
В основном будет полезна для учащихся и педагогов. Для учителей важно отметить что система работает с бд то есть все работы учеников будут в одном месте.
Распространяется фриварно.
vpi.hdd1.ru
-тупо построение блок схем(типа визео тока все само рисуется выравнивается и тп)
-генерация по коду (Pascal) блок-схем понадобится студентам и школьникам
-построение блок схемы на конкретном языке (паскаль например) возможность ее откомпилировать(да откомпилировать блок схему) сгенерировать код и получить готовый exe-шник
В основном будет полезна для учащихся и педагогов. Для учителей важно отметить что система работает с бд то есть все работы учеников будут в одном месте.
Распространяется фриварно.
vpi.hdd1.ru
Метки: Блок-Схема Обучение
В этой группе, возможно, есть записи, доступные только её участникам.
Чтобы их читать, Вам нужно вступить в группу
Чтобы их читать, Вам нужно вступить в группу