4 ай бұрын
5 ай бұрын
5 ай бұрын
Жыл бұрын
Жыл бұрын
Жыл бұрын
Жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
2 жыл бұрын
Пікірлер
@FW_77 16 күн бұрын
👍
@FW_77 Ай бұрын
Спасибо!
@FW_77 Ай бұрын
Спасибо!
@FW_77 Ай бұрын
👍
@GlassMaxxYT 2 ай бұрын
А запись как осуществлять?
@KODnyj_Ruslan 2 ай бұрын
Тут только воспроизведение, чисто плеер
@GlassMaxxYT 2 ай бұрын
@@KODnyj_Ruslan там же есть кнопочка - record
@KODnyj_Ruslan 2 ай бұрын
Наверно она просто так в форме была
@GlassMaxxYT 2 ай бұрын
@@KODnyj_Ruslan видел статьи где был код для записи аудио в файл. У меня пока не получилось))
@FW_77 4 ай бұрын
Спасибо!
@FW_77 4 ай бұрын
👍
@KODnyj_Ruslan 4 ай бұрын
👍
@FW_77 4 ай бұрын
Спасибо! Лайк вверх!
@FW_77 4 ай бұрын
👍
@FW_77 4 ай бұрын
Шутка: А все бегут, бегут, бегут и я бегу :) Спасибо!
@FW_77 4 ай бұрын
👍
@Синклит2000 4 ай бұрын
Спасибо огромное, ты единственный кто нормально объяснил как с двумерным массивом работать и выводить его. Прошло два года с публикации этого видео, а твой труд приносит до сих пор пользу!
@KODnyj_Ruslan 4 ай бұрын
Я стараюсь максимально не заумным языком объяснить за это "крутые программисты" меня не довольны. Но то что канал для чайников это не понимают
@АнтонСемёнов-х5ш 4 ай бұрын
Интересно, сейчас Delphi ещё актуальна где либо, или только для обучения программированию используется? То есть, на этой IDE ещё создают какие-нибудь коммерческие программы учитывая, что почти всё переехало в web?
@KODnyj_Ruslan 4 ай бұрын
Не все следят за модой, многие ещё работают в Делфи.
@АнтонСемёнов-х5ш 4 ай бұрын
@@KODnyj_Ruslan Я не спорю, Delphi, как и Free Pascal с Lazarus вещи крутые и одно из их преимуществ - пользователю написанных на них программ не надо искать/скачивать всякие дополнительные компоненты чтобы всё запустилось, как например дело обстоит с тем же питоном, или C#. Меня интересует другое - насколько много всяких библиотек под разные нужды и главное, легко ли найти про них инфу? Читал, что с этим беда. Или нет?
@KODnyj_Ruslan 4 ай бұрын
Все зависит от задач, мне пока всего хватает. Если нужная какая о уникальная задача и не кто это не делал то придется самому изобретать. Про информацию о сторонних компонентах, конечно хотелось бы больше.
@первый-я4ю 4 ай бұрын
Интересно а есть кокая нибудь защита от изменения типизации файла?
@KODnyj_Ruslan 4 ай бұрын
Может hash и CRC, для проверку измененных файлов
@первый-я4ю 4 ай бұрын
@@KODnyj_Ruslan только проверка ? а защиты как таковой нет?
@KODnyj_Ruslan 4 ай бұрын
Я такую не знаю
@nodirsadikov6029 4 ай бұрын
Здравствуйте сделайте пожалуйста проект web server и client rest api и работа с базой пожалуйста
@KODnyj_Ruslan 4 ай бұрын
Может мне за вас всю вашу работу сделать😃
@nodirsadikov6029 4 ай бұрын
@@KODnyj_Ruslan А чё, так можно было что ли!? 😄
@KODnyj_Ruslan 4 ай бұрын
Конечно я же за лайки готов и дипломы писать)))))) (сарказм)
@первый-я4ю 5 ай бұрын
возможно что я что то не понимаю но разве нельзя поток выделить через таймер?
@KODnyj_Ruslan 5 ай бұрын
Обновление прогресс бара через таймер? Можно но это не будет распределение по нескольким ядрам процессора, будет медленный работать и подвисать
@KODnyj_Ruslan 5 ай бұрын
Если про вызов потока через таймер, то можно, у меня через цикл сделано что бы было наглядней было
@programistaart 5 ай бұрын
Интересно,🙂продолжай записывать видео.
@KODnyj_Ruslan 5 ай бұрын
Потихоньку буду))
@БорисАлиханов-у4з 2 ай бұрын
Мне больше интерес но кому такая херня нужна? Мальчик даже выделение памяти от создания объекта не отличает
@KODnyj_Ruslan 2 ай бұрын
Мальчик отличает, просто оговаривается при записи. Главное код работает и ладно
@ШарльЛеклер-г4ф 5 ай бұрын
Как всегда интересные видео уроки! А не могли бы вы записать урок как программно из делфи допустим по нажатию кнопки завершить а потом запустить необходимую мне службу пусть к примеру это будет служба печати windows.
@KODnyj_Ruslan 5 ай бұрын
Хорошо, добавил в планы
@delphi_solutions 5 ай бұрын
То что делаешь продолжай делать, я бы хотел видеть конечно изложение материала как сравнение "старого" delphi и сопоставление с новой редакцией, ну вот, например, те же потоки как сделать стандартным способом на D7 и как сделать то же самое но современными методами
@KODnyj_Ruslan 5 ай бұрын
Нее, мысль сравнения мне не очень. Буду делать как делал
@delphi_solutions 5 ай бұрын
Так ни хера и не понял, delphi в РФ дано уже помер и это не потому что он не развивается -он развивается и выходят новые версии чуть ли не каждый год. Он умер потому что никому не нужен от слова совсем т.к. найти адекватного и продвинутого программиста Delphi для его современной редакции RAD 10.4 и выше - это огромная редкость таких программистов по всей россии чуть около 1000 всего остальные это так себе недоучки... Эта ситуация сложилась с тем что нет никакой обучающей литературы на современный стандарт языка от RAD 10 и выше, а все комьюнити похожи на секты фанатиков где тебе толком ничего не расскажут и не научат. В этом вина владельцев самой Компании Embarcadero, которые болт забили в этом плане. delphi поддерживается узким кругом людей которым за 60+ с их уходом возможно не кому будет тянуть этот проект, в нем и так уже много заимствованых идей из других языков JAVA, C# и т.д. Ну и самое главное цена кто будет покупать за пол миллиона лицензию? когда много бесплатных альтернатив?
@delphi_solutions 5 ай бұрын
А ты сам то на D7 купил лицензию? Сидишь на пиратской версии с воровоном ключом и рассказываешь что Delphi очень популярный, а Юр Лица и Гос. Организации не могут работать с пиратскими версиями в отличие от тебя, А ты сперва купи хотя бы минимальную конфигурацию за 370 тыс. потом скажешь нужен он тебе или нет за такой прайс ...
@KODnyj_Ruslan 5 ай бұрын
Лазарус бесплатный, почти как Делфи 7. Можно там писать если не хочется искать ключи или покупать лицензию
@delphi_solutions 5 ай бұрын
Не смешите людей, что Delphi популярен на вашем канале даже подписчиков почти нет: 379 человек смешно даже как тo... вы сами себе противоречите.
@KODnyj_Ruslan 5 ай бұрын
Есть каналы по Делфи где есть подписчики и по более, кроме вашего конечно)))
@delphi_solutions 5 ай бұрын
Ты это серьезно? каким он спросом пользуется "нулевым"? я позавчера искал вакансию на hh результат: в Иркутской, Красноярском крае, забайкалье, хабаравском, Якутия и т.д. во всем дальневосточном регионе - ноль вакансий! вот это супер популярность!!! это территория больше все Европы
@KODnyj_Ruslan 5 ай бұрын
Наверно не так искали, я не говорил что он первый в рейтингах среди других языков, но спросом от пользуется
@МОЙВЕЛОСЕЗОН 5 ай бұрын
Несколько устаревший способ ... сейчас уже все используют класс Ttask
@KODnyj_Ruslan 5 ай бұрын
Не все используют. Многим достаточно tthread.
@X0KI3 5 ай бұрын
Не используем обращение формы из потока. Это не есть хорошо. Для синхронизации используем критическую секцию. Не надо использовать Resume, он давно устарел и его не кто не рекомендует использовать. заместо него используем Start. Вот мой пример. однопоточности и многопоточности. type TMyThread = class(TThread) private FProgress: Integer; protected procedure SetSync; procedure SetEnd; procedure Execute; override; public { Public declarations } end; var Form1: TForm1; // Page: Integer; CriticalSection: TCriticalSection; implementation {$R *.dfm} procedure TMyThread.Execute; var I: Integer; begin CriticalSection.Enter; try for I := 0 to 100 do // за место 100 добавляем Page begin FProgress := I; Synchronize(SetSync); end; Synchronize(SetEnd); finally CriticalSection.Leave; end; end; procedure TMyThread.SetSync; begin Form1.sProgressBar1.Position := FProgress; Form1.sMemo1.Lines.Add('Цикл: ' + FProgress.ToString + ' пройден.'); end; procedure TMyThread.SetEnd; begin Form1.smemo1.Lines.Add('Пройдено: ' + FProgress.ToString + ' циклов.'); end; procedure TForm1.FormCreate(Sender: TObject); begin CriticalSection := TCriticalSection.Create; end; procedure TForm1.sButton1Click(Sender: TObject); var aThread: TMyThread; // aThread: array of TMyThread; I: Integer; для многопоточности begin Form1.sProgressBar1.Position := 0; { // Многопоточность SetLength(AThread, sSpinEdit1.Value); for I := 0 to Length(aThread) - 1 do begin // Page := sSpinEdit1.Value; AThread[I] := TMyThread.Create(True); AThread[I].FreeOnTerminate := True; AThread[I].Start; end; } AThread := TMyThread.Create(True); AThread.FreeOnTerminate := True; AThread.Start; end;
@KODnyj_Ruslan 5 ай бұрын
При большом количестве потоков ваш вариант будет безопасней, спасибо
@МОЙВЕЛОСЕЗОН 5 ай бұрын
Вы на какой RAD Studio седите? так делали при царе горохе лет 15 назад
@KODnyj_Ruslan 5 ай бұрын
Я не слежу за модой, мне главное что бы работало.
@delphi_solutions 5 ай бұрын
Если у вас RAD 10.4 и выше то USES System.Threading, System.Diagnostics, System.SyncObjs TThread.Synchronize(nil, procedure() begin // например, memo1.lines.add('my messages''); end);
@delphi_solutions 5 ай бұрын
Но лучше используйте более современный класс MyThrede := TTask.Create(procedure() begin // что то делаем в потоке TThread.Synchronize(nil, procedure() begin // например, что то выводим на форму memo1.lines.add('my messages''); end); end);
@nodirsadikov6029 5 ай бұрын
Привет сделайте урок по веб сервер и методы post put get delete
@KODnyj_Ruslan 5 ай бұрын
Попробую
@ШамаКаспийский-ъ2б 5 ай бұрын
Для чего ты выпускаешь эти уроки? Их кто-то смотрит?
@KODnyj_Ruslan 5 ай бұрын
Для вас, вы же смотрите)))
@ШамаКаспийский-ъ2б 5 ай бұрын
Да, я был случайно подписан
@KODnyj_Ruslan 5 ай бұрын
Случайности не случайны, теперь смотрите и изучайте))
@СветланаДанильченко-м5в 7 ай бұрын
Уважаемый Руслан, вы показывали построение графика в делфи, а можете подсказать как построить функцию (х-2)(3-х)/x^2 . при построении программа пишет делит на 0,можно ли с вами как то связаться
@KODnyj_Ruslan 7 ай бұрын
Может просто условие сделать if x<>0 then выполняем. Тогда ошибки не будет
@KODnyj_Ruslan 7 ай бұрын
Если число Х не равно нулю то работаем с ним, делим или ещё что нибудь
@pony8735 8 ай бұрын
откуда и как это установить?
@KODnyj_Ruslan 8 ай бұрын
Это стандартные компоненты Делфи, устанавливать не нужно просто добавить на форму
@FW_77 8 ай бұрын
👍
@FW_77 8 ай бұрын
👍
@FW_77 8 ай бұрын
Также спасибо! 👍
@FW_77 8 ай бұрын
Спасибо! 👍
@FW_77 8 ай бұрын
👍
@FW_77 8 ай бұрын
👍
@zheniskassenov5942 8 ай бұрын
Создаёт кучу отдельных txt файлов по 5 кБ переустановка не помогла,размер файла менял на миллиарды все ровно по 5 кб
@KODnyj_Ruslan 8 ай бұрын
Погляжу на неделе, генерация только по первой вкладке?
@KODnyj_Ruslan 7 ай бұрын
Скачал с сайта, сделал размер файла 10 мб, генерация букв цифр, у меня прекрасно работает, создаются файлы по 10 мб
@FW_77 8 ай бұрын
Спасибо!
@FW_77 8 ай бұрын
👍
@FW_77 8 ай бұрын
Спасибо!
@FW_77 8 ай бұрын
Почему в цикле "for" буква "I" большая, а в инициализации "i" маленькая?
@KODnyj_Ruslan 8 ай бұрын
Тут как размер тот случай когда размер значение не имеет))
@FW_77 8 ай бұрын
@@KODnyj_Ruslan понятно, спасибо!
@FW_77 8 ай бұрын
👍
@KODnyj_Ruslan 8 ай бұрын
👍
@FW_77 8 ай бұрын
Спасибо! Все получилось, кнопка скачет.
@KODnyj_Ruslan 8 ай бұрын
Очень рад))
@FW_77 8 ай бұрын
👍
@FW_77 8 ай бұрын
С одной евро играл :) Спасибо!
@FW_77 8 ай бұрын
Спасибо!
@FW_77 8 ай бұрын
Также спасибо!
@FW_77 8 ай бұрын
Узнал о "if then" операторе, спасибо!
@FW_77 8 ай бұрын
Спасибо!
@FW_77 8 ай бұрын
👍
@БорисАлиханов-у4з 8 ай бұрын
Убого и длинно. Коды морзянки удобнее поместить в массив.
@KODnyj_Ruslan 8 ай бұрын
Всегда можно упростить, мне показалось с массивом сложней для начинающих
@FW_77 8 ай бұрын
Сегодня начал изучать Delphi. До какого урока я дойду, незнаю. Хочу в будущем написать программу в дельфи для коммуникации комрьютера и PIC Микрокотроллера. Спасибо за этот урок Руслан!
@KODnyj_Ruslan 8 ай бұрын
Главное сильно желание и много труда и все получится... Когда нибудь