• Что бы вступить в ряды "Принятый кодер" Вам нужно:
    Написать 10 полезных сообщений или тем и Получить 10 симпатий.
    Для того кто не хочет терять время,может пожертвовать средства для поддержки сервеса, и вступить в ряды VIP на месяц, дополнительная информация в лс.

  • Пользаватели которые будут спамить, уходят в бан без предупреждения. Спам сообщения определяется администрацией и модератором.

  • Гость, Что бы Вы хотели увидеть на нашем Форуме? Изложить свои идеи и пожелания по улучшению форума Вы можете поделиться с нами здесь. ----> Перейдите сюда
  • Все пользователи не прошедшие проверку электронной почты будут заблокированы. Все вопросы с разблокировкой обращайтесь по адресу электронной почте : info@guardianelinks.com . Не пришло сообщение о проверке или о сбросе также сообщите нам.

delphi

  1. Sascha

    ✅ Тема 3: Delphi в 2025 году — стоит ли учить? Что можно делать?

    Delphi в 2025 году: стоит ли учить? Что это за язык, зачем он нужен и где используется сегодня ? Что такое Delphi? Delphi — это визуальная среда разработки на языке Object Pascal. Очень популярен был в 2000-х, но и сегодня используется для: Создания настольных программ для Windows...
  2. Sascha

    Разное Введение в программирование для начинающих: Python, Java, C++, и Delphi Часть 2

    Python Введение в Python Python - это многоцелевой язык программирования с чистым и читаемым синтаксисом, который делает его отличным выбором для начинающих программистов. Вот некоторые основные концепции Python: Переменные и Операторы # Примеры переменных и операторов x = 5 #...
  3. Sascha

    Разное Введение в программирование для начинающих: Python, Java, C++, и Delphi

    Программирование - это увлекательное и востребованное искусство, которое позволяет создавать компьютерные программы и приложения. В этой статье мы познакомимся с основами программирования на четырёх популярных языках программирования: Python, Java, C++, и Delphi. Давайте начнем! Python Python -...
  4. O

    Важные Помощь с доступом к компонентам Server Methods в DataSnap

    Не могу получить доступ к компонентам ServerMethods1 в DataSnap, а именно я хочу сделать так что бы можно было поменять базу данных в компоненте FDConnection через форму самого сервера, Буду благодарен за помощь. ПС очень надо...
  5. O

    Помощь в коде Передача переменных по ServerSocket и ClientSocket

    Добрый день. Не могу разобраться с передачей переменных по компонентам ServerSocket и ClientSocket в языке программирования Delphi. А именно, не могу передать пакеты с тестовыми переменными, что бы их можно было использовать в последующих командах на сервере. Буду очень благодарен за пояснения...
  6. Sascha

    Delphi Создание ярлыка на рабочем столе и на панели быстрого запуска

    Достаточно часто в интернете встречается подобный вопрос. И на самом деле это интересная и полезная тема. Данная статья расскажет о том, как создавать свои ярлычки на рабочем столе и на панели быстрого запуска. Сделаем небольшие приготовления: uses {...}, Registry, ShlObj, ComObj, ActiveX...
  7. Lomanu4

    Delphi TaskBar Generation progress in Icone #Delphi

    procedure TForm1.ComboBox1Change(Sender: TObject); begin case ComboBox1.ItemIndex of 0:Taskbar1.ProgressState:=TTaskBarProgressState.None; 1:Taskbar1.ProgressState:=TTaskBarProgressState.Normal; 2:Taskbar1.ProgressState:=TTaskBarProgressState.Indeterminate...
  8. Lomanu4

    FAQ Delphi FMX Virtual Keyboard in Android covers control by Lomanu4

    Одна вещь, которая действительно может добавить блеск вашему приложению, это настроить его так, чтобы, когда поле редактирования получало фокус, оно автоматически появлялось над клавиатурой на мобильных устройствах. Если этого не сделать, клавиатура иногда может закрывать поле редактирования...
  9. Lomanu4

    Delphi Функция для генерации уникального идентификатора в строке

    View: https://www.youtube.com/watch?v=WG5FoJhNEyM&feature=youtu.be Часто необходимо создать какой-то уникальный индексатор в наших приложениях. Чтобы легко решить эту проблему, вы можете использовать функцию ниже: Примечание: вам нужны эти объявленные System.SysUtils в разделе использования...
  10. Lomanu4

    Delphi error sending data 12030 , соединение с сервером было прервано delphi

    Вот сижу я такой пишу софтик... Работаю с компонентом nethttpclient,делаю запрос на получение данных в json format,на виндовс 10 все прекрасно работает. Решил протестить на виндовс 7 так как мой софт так же работает на многих платформах и приходиться тестировать на виртуалке а то и симуляторах...
  11. Lomanu4

    Delphi Определение серийного номера съемного носителя

    Определить серийный номер флешки с помощью Delphi довольно просто. Основная функция для определения SerialNumber является GetVolumeInformation, которая включает себя несколько параметров. GetVolumeInformation – это API функция принимающая ряд параметров, один из которых является указатель на...
  12. Lomanu4

    FAQ Сохраняем Bitmap в поле dbase

    Сохраняем Bitmap в поле dbase с именем Icon. Icon представляет собой двоичное Blob-поле. procedure .... var IconStream : TMemoryStream; begin IconStream := TMemoryStream.Create; Image1.picture.icon.savetostream(IconStream); (Table1.fieldbyname('Icon') as TBlobField).LoadFromStream(IconStream)...
  13. S

    Помощь в коде Tchromium Beforeresourceload

    procedure TForm3.Chromium1BeforeResourceLoad(Sender: TObject; const browser: ICefBrowser; const frame: ICefFrame; const request: ICefRequest; out Result: Boolean); begin Request.PostData.GetElements(request.PostData.GetCount); end; Request.PostData.GetElements возвращает IInterfaceList мне...
  14. S

    Браузер

    Необходим браузер windows 1 возможность работать через прокси http/https с логином паролем 2 возможность менять юсерагент 3 авторизация на сайте ВК 1. вариант на делфи firemonkey функция openBrowser(VKlogin,VKpass,ProxyServer,ProxyPort,ProxyLogin,ProxyPass:string) при этом открывается новая...
  15. Sascha

    Stringgrid Зум:

    StringGrid зум: требует формы с StringGrid называемой сеткой и два TBitBtn. сетка функции масштабирования (Факт) передается коэффициентом реального числа, указывающий уровень масштабирования: Не 1,0 - никаких изменений 0,9 - Малый 1,1 - Изображение большего размера Эта функция в настоящее...
  16. Sascha

    Как Определить Время Последнего Изменения Файла?

    function GetFileModifyDate( FileName: string ): TDateTime; var h: THandle; Struct: TOFSTRUCT; LastWrite: Integer; begin // h := OpenFile( PChar( FileName ), Struct, OF_SHARE_DENY_NONE ); h := CreateFile( PChar( FileName ), GENERIC_READ, FILE_SHARE_READ, nil...
  17. Sascha

    Как Определить Тип Файла (как В Диалоге "свойства Файла")?

    uses {...,} ShellAPI; function MrsGetFileType( const strFilename: string ): string; var FileInfo: TSHFileInfo; begin FillChar( FileInfo, SizeOf( FileInfo), #0 ); SHGetFileInfo( PChar( strFilename), 0, FileInfo, SizeOf( FileInfo ), SHGFI_TYPENAME ); Result := FileInfo.szTypeName...
  18. Sascha

    Как Проверить, Пуста Директория, Или Нет?

    function DirectoryIsEmpty( Directory: string ): boolean; var sr: TSearchRec; i: Integer; begin Result := false; FindFirst( IncludeTrailingPathDelimiter( Directory ) + '*', faAnyFile, sr ); for i := 1 to 2 do if ( sr.Name = '.' ) or ( sr.Name = '..' ) then Result :=...
  19. Sascha

    Как Определить, Является Ли Диск Ntfs?

    uses {...,} ComObj; function IsNTFS( AFileName: string ): boolean; var fso, drv: OleVariant; begin IsNTFS := False; fso := CreateOleObject( 'Scripting.FileSystemObject' ); drv := fso.GetDrive( fso.GetDriveName( AFileName ) ); IsNTFS := drv.FileSystem = 'NTFS' end; Код для...
Вверх Снизу