Al-Muhandis

// ... ... ...

uses fpjson, jsonscanner, fpjsonrtti
  ;
  
 // ... ... ...

procedure LoadFromJSON(AObject: TObject; const AFileName: String);
var
  ADeStreamer: TJSONDeStreamer;

Al-Muhandis

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls;

type

Al-Muhandis

unit zip_odt;

{$mode ObjFPC}{$H+}

interface

uses
  Classes, SysUtils;

procedure FillODTDoc(const aSrcFile, aDestFile: String; aKeyValuePairs: TStringList);

Al-Muhandis

#user 'sampleuser' virtual host 'telegramapi.sample.com' configuration file
server {
	server_name telegramapi.sample.com www.telegramapi.sample.com;
  ... ... ...
  location / {
		proxy_set_header Host api.telegram.org;
		proxy_pass https://api.telegram.org;
		proxy_set_header X-Forwarded-Host $host;
		proxy_set_header X-Forwarded-Server $host;
		proxy_set_header X-Forwarded-For $proxy_add_x_forwarded_for;

Al-Muhandis

unit odt_2_pdf;

{$mode ObjFPC}{$H+}

interface

uses
  Classes, SysUtils;

function ConvertODT2Pdf(const aSrcODT, aOutDir: String): Boolean;