Delphi 11 Converting a record to a Json string (Serialization) - Quick Clip
In this video we will show very quickly how to use the System.Json.Serializer to convert a record to a Json String.
Chapters:
00:00 Intro
00:08 New Delphi Console Project
00:10 "Use" Unit System.JSON.Serializers
00:17 Make TMyRecord record
00:28 Setup JSON console output
00:40 Create TJsonSerializer
00:51 Declare TMyRecord Instance
01:08 readln to pause output
01:14 run program (Console output)
Software Used:
Delphi Enterprise 11:
https://www.embarcadero.com/products/delphi/starter/free-download
MMX – speed up your Delphi development:
https://www.mmx-delphi.de/
Program Source:
program Project8;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils,
System.JSON.Serializers;
type
TMyRecord = record
Name: String;
Date: TDateTime;
Money: Double;
Years: Integer;
end;
begin
try
var lSerializer := TJsonSerializer.Create;
try
var lMyRecord: TMyRecord;
lMyRecord.Name := 'Jim';
lMyRecord.Date := EncodeDate(2022,5,16);
lMyRecord.Money := 3412;
lMyRecord.Years := 12;
Writeln(lSerializer.Serialize(lMyRecord));
Readln;
finally
FreeAndNil(lSerializer);
end;
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.
#delphi #json #export #serialization #TJsonSerializer #serializer #embarcadero
Что делает видео по-настоящему запоминающимся? Наверное, та самая атмосфера, которая заставляет забыть о времени. Когда вы заходите на RUVIDEO, чтобы посмотреть онлайн «Delphi 11 Converting a record to a Json string (Serialization) - Quick Clip», вы рассчитываете на нечто большее, чем просто загрузку плеера. И мы это понимаем. Контент такого уровня заслуживает того, чтобы его смотрели в HD 1080, без дрожания картинки и бесконечного буферизации.
Честно говоря, Rutube сегодня — это кладезь уникальных находок, которые часто теряются в общем шуме. Мы же вытаскиваем на поверхность самое интересное. Будь то динамичный экшн, глубокий разбор темы от любимого автора или просто уютное видео для настроения — всё это доступно здесь бесплатно и без лишних формальностей. Никаких «заполните анкету, чтобы продолжить». Только вы, ваш экран и качественный поток.
Если вас зацепило это видео, не забудьте взглянуть на похожие материалы в блоке справа. Мы откалибровали наши алгоритмы так, чтобы они подбирали контент не просто «по тегам», а по настроению и смыслу. Ведь в конечном итоге, онлайн-кинотеатр — это не склад файлов, а место, где каждый вечер можно найти свою историю. Приятного вам отдыха на RUVIDEO!
Видео взято из открытых источников Rutube. Если вы правообладатель, обратитесь к первоисточнику.