Последние записи
- TChromium (CEF3), сохранение изображений
- Как в Delphi XE обнулить таймер?
- Изменить цвет шрифта TextBox на форме
- Ресайз PNG без потери прозрачности
- Вывод на печать графического файла
- Взаимодействие через командную строку
- Перенести программу из Delphi в Lazarus
- Определить текущую ОС
- Автоматическая смена языка (раскладки клавиатуры)
- Сравнение языков на массивах. Часть 2
Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk
Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
15th
Апр
Микросхемы динамической памяти DRAM
Микросхемы динамической памяти DRAM: (NEC 4164 и обычные КР565РУ5) можно использовать как видеокамеру. Сам принцип использования основан на эффекте ускорения разряда конденсаторов в ячейках памяти при воздействии на них света. Для этого нужно по всем адресам микросхемы со снятой крышкой
записать единицы, через некоторое время (без регенерации) – прочитать. Те ячейки матрицы памяти, на которые падает свет, разряжаются и переходят в состояние 0 раньше, которые остались в
тени – позже.
DRAM является микросхемой памяти, поэтому распределение логического адреса должно соответствует физическому месту на кристалле. Чтобы узнавать это распределение необходимо провести несколько испытаний. В микросхеме DRAM, адреса ячеек которой состоят из двух составляющих – адреса строк и адреса столбцов, можно предположить, что и в физической структуре кристалла они расположены точно
также. Как обнаружилось, это фактически так и есть, т.е. логические адреса строк соответствуют физическим строкам, и логические адреса столбцов соответствуют физическим столбцам.
Логические адреса в пределах строки соответствуют разумеется не физическому месту ячейке памяти на интегральной схеме на монокристалле. В обработанном изображение видно это ошибочное распределение перестановленными строками и столбцами. Перестановка разрядов адреса позволяет этот дефект устранить, но, тем не менее, здесь все-таки нужен экспериментальный подход. Геометрия интегральных схем на
монокристалле различных изготовителей может быть другой.
Интегральная схема на монокристалле не обеспечивает высокую чувствительность, так что время облучения кристалла более длительное, чем у настоящей CCD-видеокамеры. Отмечено, что кристалл
микросхемы DRAM более восприимчив к красному спектру оптического диапазона, чем к голубому, возможно он имеет хорошую спектральную чувствительность в инфракрасном спектре излучения.
Примечание. Конечно, можно рекомендовать заниматься подобными экспериментами, если СОВСЕМ БОЛЬШЕ НЕЧЕМ заняться или для изучения физических принципов процесса. Если требуется реальная камера, то дешевле и по затратам времени приобрести дешевую CCD со схемой управления.
Скачать этот номер можно по ссылке.
Ознакомиться со всеми номерами журнала.
15th
Разгон 3G. USB модема
Разгон 3G.USB модема: для повышения уровня сигнала и как следствие стабильности коннекта и скорости, можно воспользоваться простым, не требующий затрат, способом.
Подопытным выступил «Билайновский» модем ZTE MF-622. Нужен провод ~20см длины, желательно медный (в резиновой оплётке или без, неважно). Оборачиваем несколько витков вокруг модема, расстояние между витками 1см. Также нам понадобиться CD или DVD диск, любой ненужный, и проутюжив его, слегка согните как показано на фото.
Направляем наш импровизированный девайс в ту сторону, где находится вышка оператора и… вуа-ля.
(автор, наш форумчанин Vasek123)
Статья из первого выпуска “журнала ПРОграммистов”.
Скачать этот номер можно по ссылке.
Ознакомиться со всеми номерами журнала.
13th
Апр
“Культура” работы с БД
Совет по работе с бд от Stilet.
Имею класс, в котором описаны поля, а так же имею список (а-ля массив) обьектов этого класса.
Далее:
- Открыл набор
- Создал экземпляр класса, вписал в него поля из БД
- В цикле перешел на следующую запись и повторил 2) пока не конец таблицы
- Закрыл набор, разорвал связь с базой
Все теперь у меня данные сидят в массиве обьектов.
Вот так это может выглядеть:
Это класс с полями
TAsm=class(TComponent)
Private
FFields:TStringList;
public
constructor Create(AOwner: TComponent);
destructor Destroy; override;
end;
Это его наполнение
var ado:TADOQuery;i:integer;a:TAsm;
begin Result:=nil;
ado:=TADOQuery.Create(nil);
ado.ConnectionString:=ConnectString;
ado.SQL.Text:=’select * from GetModels()’;
ado.Open;
while not ado.Eof do begin
a:=TAsm.Create(self);
for i:=0 to ado.FieldCount-1 do
a.FFields.Add(ado.Fields.DisplayName+’=’+Trim(ado.Fields.AsString));
FAsms.Add(a);
ado.Next;
end;
ado.Close;ado.Free;
end;
Теперь в “массиве” FAsm у меня записи из базы.
12th
Апр
Параноя антивирей на упакованные файлы
Есть обычная программка с форума, календарь рисует. Ради эксперимента упаковал по разному, пакерами. Один файл просто ASPack`ом, второй(копия файла упакованного ASPack`ом) упаковал повторно через NSPack. Упаковка везде была с максимум сжатия.
Вот результаты с Virustotal
- Project1_pack_ASPack – http://www.virustotal.com/ru/analisi…afa-1271076748
- Project1_pack_ASPack-NSPack – http://www.virustotal.com/ru/analisi…71d-1271076753
Вот как безопасный файл становится вирусом
Ishodnik programm.rar
Project1_pack_ASPack.rar
Project1_pack_ASPack-NSPack.rar
12th
Fortress 2. Конкурс. Создание лучшего бота
Не прошло и месяца как на форуме программистов стартует новый конкурс на создание лучшего бота к игре Fortress 2.
Приз за первое место 1000 р.. Если участников будет много, то занявшие 2 и 3 место получат утешительные призы – 100 р.
Для тех кто не в курсе : бот представляет собой DLL с тремя экспортируемыми функциями.
Документация по созданию бота находится в файле Fortress 2 Bot Specification
Скачать Fortress 2 build 2025 beta + Документация + исходник SimpleBot v1.0
Скачать исходники SimpleBot v1.0 на С++ (CodeBlocks+MinGW)
Ориентировочная дата подведения итогов конкурса – июнь.
Почему надо участвовать в этом конкурсе?
Во-первых, это интересно!
Во-вторых, можно получить денежный приз, пусть это всего 1000 р., но на “пиво попить” хватит.
В-третьих, вы получите опыт в создании ИИ для игры, и сможете сказать “Я разрабатывал бота для игры!”
Все кто хочет и будет участвовать отписываемся здесь.
11th
Апр
Проблемы при разработке
Всякий раз как приступаю к разработке чего-либо, всегда сталкиваюсь с какими то страшными проблемами и неизвестными багами. Чтение документации, гугление, постоянные перезагрузки, консультации с братьями по оружию, которые часто просто разводят руками и наконец отладчик и дизассемблер. Вся эта мириада преобразований энергии в материю и обратно приводит к появлению очередной программы. Ценой ей служат потерянные нервные клетки.
Теперь вопрос:
Всегда ли так? Или же большая часть этих потерь связана с качеством знаний?
И наконец простой вопрос: получается ли у вас написать программу не тратя на нее нервы?
Ну и риторический вопрос: смирится или же нужно что то делать с инструментарием? Я вот давно подумываю сделать себе что то вроде фреймворка, наподобии .NET-а(для С++) и аналог MFC для ассемблера, но все никак не пойму в чем моя проблема. Ведь когда я писал ОС – все баги были на мне и я их довольно быстро находил. Да и вся разработка шла как по маслу. А вот под Win32 всегда возникают какие то левые проблемы. Код одинаковый, а через пару перезагрузок баги исчезают.
PS: Помогу я себе конечно же сам, мне просто интересно мнение и опыт других людей.
9th
Апр
FATXX, NTFS, EXTX структуры файловых систем
Интересуюсь самими структурами файловых систем. в частности интересует, почему Windows видит ntfs, fatXX, а extX не видит. Также интересует, из чего именно состоит файловая система, как она записывается на диск и прочее.
9th
Генерация даты в заданном промежутке
Diapazon : integer;
begin
Randomize;
dt1 := EncodeDate(2006, 01, 02);
dt2 := EncodeDate(2009, 01, 01);
Diapazon := trunc(dt2) – trunc(dt1) + 1;
dtRandom := dt1 + random(Diapazon);
button1.Caption := DateToStr(dtRandom);
7th
Апр
Как сделать прозрачной картинку в delphi
Возьмите bmp, весь “ненужный” фон закрасьте розовым (R:FF G:0 B:FF) потом загрузите эту картинку в tBitMap и нарисуйте сделайте ему следующие “ампутации”:
Код:
Bit.Transparent:=TRUE;
Bit.TransparentColor:=$FF00FF;
Потом нарисуйте его на канве картинки.
Если не устраивает – возьмите компонент TPngImage
Облако меток
css реестр ассемблер timer SaveToFile ShellExecute программы массив советы word MySQL SQL ListView pos random компоненты дата LoadFromFile form база данных сеть html php RichEdit indy строки Win Api tstringlist Image мысли макросы Edit ListBox office C/C++ memo графика StringGrid canvas поиск файл Pascal форма Файлы интернет Microsoft Office Excel excel winapi журнал ПРОграммист DelphiКупить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту
пеллетные котлы
Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)