Others

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, generics. collections; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); Private Procedure

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, generics. collections; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); Private Procedure

Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); end; var form1: tform1; implementation {

Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); end; var form1: tform1; implementation {

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, generics. collections; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); Private Procedure

I have never seen this class before. It is implemented based on tstringbuilder. It can be used to easily write various data types into strings. Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls,

There is also a superxmlparser unit in the superobject file package, which can parse isuperobject from XML. Superxmlparser has only three functions: xmlparsestring, xmlparsestream, and xmlparsefile, which are parsed from strings, streams, and

Address format for calling Google translation: Http://ajax.googleapis.com/ajax/services/language/translate? V = 1.0 & Q = "+ original text +" & langpair = "+ original language +" % 7C "+ target language The returned data format is as

Operation live video in the first example: interface_test.rar CodeFile: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1:

Code File: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; button2: tbutton; button3: tbutton; button4: tbutton; Procedure

Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); end; var form1: tform1; implementation {

Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); end; var form1: tform1; implementation {

Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); end; var form1: tform1; implementation {

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; button2: tbutton; procedure button1click (Sender: tobject); Procedure button2click (

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) memo1: tmemo; button1: tbutton; button2: tbutton; Procedure button1click (Sender: tobject); Procedure

A common method for constructing a JSON object using superobject: from a string, from a file, or from a stream. Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1

Tstringreader has fewer methods than tstringwriter. It can be read by character, line, or all; The character encoding is obtained when the characters are read, and the string is obtained by reading all or by row. The character array is also

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; button2: tbutton; button3: tbutton; button4: tbutton; button5: tbutton; Procedure

Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; button2: tbutton; button3: tbutton; Procedure button1click (Sender: tobject);

Both tstreamwriter and tstringwriter inherit from the abstract class: ttextwriter; Both tstreamreader and tstringreader inherit from the abstract class: ttextreader. They have similar functions, but tstreamwriter and tstreamreader have the "stream"