├── .gitattributes
├── .gitignore
├── README.md
└── source
├── fpc-res.or
├── fpc-res.res
├── frminsertbullet.lfm
├── frminsertbullet.lrs
├── frminsertbullet.o
├── frminsertbullet.pas
├── frminsertbullet.ppu
├── frminsertbutton.lfm
├── frminsertbutton.lrs
├── frminsertbutton.o
├── frminsertbutton.pas
├── frminsertbutton.ppu
├── frminsertcheckbox.lfm
├── frminsertcheckbox.lrs
├── frminsertcheckbox.o
├── frminsertcheckbox.pas
├── frminsertcheckbox.ppu
├── frminsertdiv.lfm
├── frminsertdiv.lrs
├── frminsertdiv.o
├── frminsertdiv.pas
├── frminsertdiv.ppu
├── frminsertfieldset.lfm
├── frminsertfieldset.lrs
├── frminsertfieldset.o
├── frminsertfieldset.pas
├── frminsertfieldset.ppu
├── frminsertflash.lfm
├── frminsertflash.lrs
├── frminsertflash.o
├── frminsertflash.pas
├── frminsertflash.ppu
├── frminsertform.lfm
├── frminsertform.lrs
├── frminsertform.o
├── frminsertform.pas
├── frminsertform.ppu
├── frminserthidden.lfm
├── frminserthidden.lrs
├── frminserthidden.o
├── frminserthidden.pas
├── frminserthidden.ppu
├── frminsertimage.lfm
├── frminsertimage.lrs
├── frminsertimage.o
├── frminsertimage.pas
├── frminsertimage.ppu
├── frminsertlink.lfm
├── frminsertlink.lrs
├── frminsertlink.o
├── frminsertlink.pas
├── frminsertlink.ppu
├── frminsertparagraph.lfm
├── frminsertparagraph.lrs
├── frminsertparagraph.o
├── frminsertparagraph.pas
├── frminsertparagraph.ppu
├── frminsertpassword.lfm
├── frminsertpassword.lrs
├── frminsertpassword.o
├── frminsertpassword.pas
├── frminsertpassword.ppu
├── frminsertradio.lfm
├── frminsertradio.lrs
├── frminsertradio.o
├── frminsertradio.pas
├── frminsertradio.ppu
├── frminsertspan.lfm
├── frminsertspan.lrs
├── frminsertspan.o
├── frminsertspan.pas
├── frminsertspan.ppu
├── frminserttable.lfm
├── frminserttable.lrs
├── frminserttable.o
├── frminserttable.pas
├── frminserttable.ppu
├── frminserttextarea.lfm
├── frminserttextarea.lrs
├── frminserttextarea.o
├── frminserttextarea.pas
├── frminserttextarea.ppu
├── frminserttextbox.lfm
├── frminserttextbox.lrs
├── frminserttextbox.o
├── frminserttextbox.pas
├── frminserttextbox.ppu
├── link.res
├── ppas.bat
├── project1.compiled
├── project1.ico
├── project1.lpi
├── project1.lpr
├── project1.lrs
├── project1.manifest
├── project1.o
├── project1.or
├── project1.pas
├── project1.rc
├── project1.res
├── unit1.lfm
├── unit1.lrs
├── unit1.o
├── unit1.pas
├── unit1.ppu
├── unit2.lfm
├── unit2.lrs
├── unit2.o
├── unit2.pas
└── unit2.ppu
/.gitattributes:
--------------------------------------------------------------------------------
1 | # Auto detect text files and perform LF normalization
2 | * text=auto
3 |
4 | # Custom for Visual Studio
5 | *.cs diff=csharp
6 | *.sln merge=union
7 | *.csproj merge=union
8 | *.vbproj merge=union
9 | *.fsproj merge=union
10 | *.dbproj merge=union
11 |
12 | # Standard to msysgit
13 | *.doc diff=astextplain
14 | *.DOC diff=astextplain
15 | *.docx diff=astextplain
16 | *.DOCX diff=astextplain
17 | *.dot diff=astextplain
18 | *.DOT diff=astextplain
19 | *.pdf diff=astextplain
20 | *.PDF diff=astextplain
21 | *.rtf diff=astextplain
22 | *.RTF diff=astextplain
23 |
--------------------------------------------------------------------------------
/.gitignore:
--------------------------------------------------------------------------------
1 | #################
2 | ## Eclipse
3 | #################
4 |
5 | *.pydevproject
6 | .project
7 | .metadata
8 | bin/
9 | tmp/
10 | *.tmp
11 | *.bak
12 | *.swp
13 | *~.nib
14 | local.properties
15 | .classpath
16 | .settings/
17 | .loadpath
18 |
19 | # External tool builders
20 | .externalToolBuilders/
21 |
22 | # Locally stored "Eclipse launch configurations"
23 | *.launch
24 |
25 | # CDT-specific
26 | .cproject
27 |
28 | # PDT-specific
29 | .buildpath
30 |
31 |
32 | #################
33 | ## Visual Studio
34 | #################
35 |
36 | ## Ignore Visual Studio temporary files, build results, and
37 | ## files generated by popular Visual Studio add-ons.
38 |
39 | # User-specific files
40 | *.suo
41 | *.user
42 | *.sln.docstates
43 |
44 | # Build results
45 |
46 | [Dd]ebug/
47 | [Rr]elease/
48 | x64/
49 | build/
50 | [Bb]in/
51 | [Oo]bj/
52 |
53 | # MSTest test Results
54 | [Tt]est[Rr]esult*/
55 | [Bb]uild[Ll]og.*
56 |
57 | *_i.c
58 | *_p.c
59 | *.ilk
60 | *.meta
61 | *.obj
62 | *.pch
63 | *.pdb
64 | *.pgc
65 | *.pgd
66 | *.rsp
67 | *.sbr
68 | *.tlb
69 | *.tli
70 | *.tlh
71 | *.tmp
72 | *.tmp_proj
73 | *.log
74 | *.vspscc
75 | *.vssscc
76 | .builds
77 | *.pidb
78 | *.log
79 | *.scc
80 |
81 | # Visual C++ cache files
82 | ipch/
83 | *.aps
84 | *.ncb
85 | *.opensdf
86 | *.sdf
87 | *.cachefile
88 |
89 | # Visual Studio profiler
90 | *.psess
91 | *.vsp
92 | *.vspx
93 |
94 | # Guidance Automation Toolkit
95 | *.gpState
96 |
97 | # ReSharper is a .NET coding add-in
98 | _ReSharper*/
99 | *.[Rr]e[Ss]harper
100 |
101 | # TeamCity is a build add-in
102 | _TeamCity*
103 |
104 | # DotCover is a Code Coverage Tool
105 | *.dotCover
106 |
107 | # NCrunch
108 | *.ncrunch*
109 | .*crunch*.local.xml
110 |
111 | # Installshield output folder
112 | [Ee]xpress/
113 |
114 | # DocProject is a documentation generator add-in
115 | DocProject/buildhelp/
116 | DocProject/Help/*.HxT
117 | DocProject/Help/*.HxC
118 | DocProject/Help/*.hhc
119 | DocProject/Help/*.hhk
120 | DocProject/Help/*.hhp
121 | DocProject/Help/Html2
122 | DocProject/Help/html
123 |
124 | # Click-Once directory
125 | publish/
126 |
127 | # Publish Web Output
128 | *.Publish.xml
129 | *.pubxml
130 |
131 | # NuGet Packages Directory
132 | ## TODO: If you have NuGet Package Restore enabled, uncomment the next line
133 | #packages/
134 |
135 | # Windows Azure Build Output
136 | csx
137 | *.build.csdef
138 |
139 | # Windows Store app package directory
140 | AppPackages/
141 |
142 | # Others
143 | sql/
144 | *.Cache
145 | ClientBin/
146 | [Ss]tyle[Cc]op.*
147 | ~$*
148 | *~
149 | *.dbmdl
150 | *.[Pp]ublish.xml
151 | *.pfx
152 | *.publishsettings
153 |
154 | # RIA/Silverlight projects
155 | Generated_Code/
156 |
157 | # Backup & report files from converting an old project file to a newer
158 | # Visual Studio version. Backup files are not needed, because we have git ;-)
159 | _UpgradeReport_Files/
160 | Backup*/
161 | UpgradeLog*.XML
162 | UpgradeLog*.htm
163 |
164 | # SQL Server files
165 | App_Data/*.mdf
166 | App_Data/*.ldf
167 |
168 | #############
169 | ## Windows detritus
170 | #############
171 |
172 | # Windows image file caches
173 | Thumbs.db
174 | ehthumbs.db
175 |
176 | # Folder config file
177 | Desktop.ini
178 |
179 | # Recycle Bin used on file shares
180 | $RECYCLE.BIN/
181 |
182 | # Mac crap
183 | .DS_Store
184 |
185 |
186 | #############
187 | ## Python
188 | #############
189 |
190 | *.py[co]
191 |
192 | # Packages
193 | *.egg
194 | *.egg-info
195 | dist/
196 | build/
197 | eggs/
198 | parts/
199 | var/
200 | sdist/
201 | develop-eggs/
202 | .installed.cfg
203 |
204 | # Installer logs
205 | pip-log.txt
206 |
207 | # Unit test / coverage reports
208 | .coverage
209 | .tox
210 |
211 | #Translations
212 | *.mo
213 |
214 | #Mr Developer
215 | .mr.developer.cfg
216 |
--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
1 | W3Edit-HTML-Editor
2 | ==================
3 |
4 | W3Edit is a cross-platform editor for HTML, CSS, PHP. It supports syntax highlighting with easy to use HTML & CSS helpers, HTML DocType templates and clean and simple tabbed document interface.
5 |
6 | Main Features
7 | =============
8 |
9 | - Syntax highlighting (HTML, CSS, PHP)
10 | - Easy to use HTML & CSS helpers
11 | - HTML DocType templates
12 | - Handy RGB to Hex Color maker tool
13 | - Shell integration with "Edit with W3Edit"
14 | - Tabbed document interface
15 |
16 | Development Notes
17 | =================
18 | Compiled with Lazarus (x86).
19 |
--------------------------------------------------------------------------------
/source/fpc-res.or:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/fpc-res.or
--------------------------------------------------------------------------------
/source/fpc-res.res:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/fpc-res.res
--------------------------------------------------------------------------------
/source/frminsertbullet.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertbullet.o
--------------------------------------------------------------------------------
/source/frminsertbullet.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertBullet;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertBullet }
14 |
15 | TfInsertBullet = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | ComboBox1: TComboBox;
20 | Memo1: TMemo;
21 | tinline: TEdit;
22 | Image1: TImage;
23 | Label6: TLabel;
24 | Panel1: TPanel;
25 | tclass: TEdit;
26 | tid: TEdit;
27 | Label1: TLabel;
28 | Label2: TLabel;
29 | Label4: TLabel;
30 | Label5: TLabel;
31 | procedure bcancelClick(Sender: TObject);
32 | procedure BitBtn1Click(Sender: TObject);
33 | procedure bokClick(Sender: TObject);
34 | procedure CancelButtonClick(Sender: TObject);
35 | procedure FormActivate(Sender: TObject);
36 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
37 | procedure FormCreate(Sender: TObject);
38 | procedure FormShow(Sender: TObject);
39 | private
40 | { private declarations }
41 | public
42 | { public declarations }
43 | end;
44 |
45 | var
46 | fInsertBullet: TfInsertBullet;
47 |
48 | implementation
49 |
50 | uses unit1;
51 |
52 | procedure TfInsertBullet.FormCreate(Sender: TObject);
53 | begin
54 |
55 | end;
56 |
57 | procedure TfInsertBullet.FormActivate(Sender: TObject);
58 | begin
59 | combobox1.SetFocus;
60 | end;
61 |
62 | procedure TfInsertBullet.FormClose(Sender: TObject; var CloseAction: TCloseAction
63 | );
64 | begin
65 | CloseAction := caFree;
66 | end;
67 |
68 | procedure TfInsertBullet.CancelButtonClick(Sender: TObject);
69 | begin
70 | Close;
71 | end;
72 |
73 | procedure TfInsertBullet.BitBtn1Click(Sender: TObject);
74 | begin
75 |
76 | end;
77 |
78 | procedure TfInsertBullet.bcancelClick(Sender: TObject);
79 | begin
80 | Close;
81 | end;
82 |
83 | procedure TfInsertBullet.bokClick(Sender: TObject);
84 | var
85 | c:string;
86 | i:integer;
87 | begin
88 | if combobox1.ItemIndex=0 then c:='
'' then c:=c+' class="'+tclass.text+'"';
90 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
91 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
92 | c:=c+'>'+#13#10;
93 | if trim(memo1.Text)<>'' then for i:=0 to memo1.lines.count-1 do if trim(memo1.lines[i])<>'' then c:=c+' '+memo1.lines[i]+' '+#13#10;
94 | if combobox1.ItemIndex=0 then c:=c+' ' else c:=c+'';
95 | InsertEditor(c);
96 | Close;
97 | end;
98 |
99 | procedure TfInsertBullet.FormShow(Sender: TObject);
100 | begin
101 |
102 | end;
103 |
104 | initialization
105 | {$I frminsertbullet.lrs}
106 |
107 | end.
108 |
109 |
--------------------------------------------------------------------------------
/source/frminsertbullet.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertbullet.ppu
--------------------------------------------------------------------------------
/source/frminsertbutton.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertbutton.o
--------------------------------------------------------------------------------
/source/frminsertbutton.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertButton;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertButton }
14 |
15 | TfInsertButton = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | CheckBox1: TCheckBox;
20 | ComboBox2: TComboBox;
21 | Edit1: TEdit;
22 | Edit5: TEdit;
23 | Label3: TLabel;
24 | Label8: TLabel;
25 | tinline: TEdit;
26 | Image1: TImage;
27 | Label6: TLabel;
28 | Panel1: TPanel;
29 | tclass: TEdit;
30 | tid: TEdit;
31 | Label1: TLabel;
32 | Label4: TLabel;
33 | Label5: TLabel;
34 | procedure bcancelClick(Sender: TObject);
35 | procedure BitBtn1Click(Sender: TObject);
36 | procedure bokClick(Sender: TObject);
37 | procedure CancelButtonClick(Sender: TObject);
38 | procedure ComboBox1Change(Sender: TObject);
39 | procedure Edit1Change(Sender: TObject);
40 | procedure FormActivate(Sender: TObject);
41 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
42 | procedure FormCreate(Sender: TObject);
43 | procedure FormShow(Sender: TObject);
44 | private
45 | { private declarations }
46 | public
47 | { public declarations }
48 | end;
49 |
50 | var
51 | fInsertButton: TfInsertButton;
52 |
53 | implementation
54 |
55 | uses unit1;
56 |
57 | procedure TfInsertButton.FormCreate(Sender: TObject);
58 | begin
59 |
60 | end;
61 |
62 | procedure TfInsertButton.FormActivate(Sender: TObject);
63 | begin
64 | edit1.SetFocus;
65 | end;
66 |
67 | procedure TfInsertButton.FormClose(Sender: TObject; var CloseAction: TCloseAction
68 | );
69 | begin
70 | CloseAction := caFree;
71 | end;
72 |
73 | procedure TfInsertButton.CancelButtonClick(Sender: TObject);
74 | begin
75 | Close;
76 | end;
77 |
78 | procedure TfInsertButton.ComboBox1Change(Sender: TObject);
79 | begin
80 |
81 | end;
82 |
83 | procedure TfInsertButton.Edit1Change(Sender: TObject);
84 | begin
85 | tid.text := edit1.text;
86 | end;
87 |
88 | procedure TfInsertButton.BitBtn1Click(Sender: TObject);
89 | begin
90 |
91 | end;
92 |
93 | procedure TfInsertButton.bcancelClick(Sender: TObject);
94 | begin
95 | Close;
96 | end;
97 |
98 | procedure TfInsertButton.bokClick(Sender: TObject);
99 | var c:string;
100 | begin
101 | c:=c+' '' then c:=c+' name="'+edit1.text+'"';
103 | if edit5.text<>'' then c:=c+' value="'+edit5.text+'"';
104 | if checkbox1.checked then c:=c+' disabled="disabled"';
105 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
106 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
107 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
108 | c:=c+' />';
109 | InsertEditor(c);
110 | Close;
111 | end;
112 |
113 | procedure TfInsertButton.FormShow(Sender: TObject);
114 | begin
115 |
116 | end;
117 |
118 | initialization
119 | {$I frminsertbutton.lrs}
120 |
121 | end.
122 |
123 |
--------------------------------------------------------------------------------
/source/frminsertbutton.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertbutton.ppu
--------------------------------------------------------------------------------
/source/frminsertcheckbox.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertcheckbox.o
--------------------------------------------------------------------------------
/source/frminsertcheckbox.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertCheckbox;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertCheckbox }
14 |
15 | TfInsertCheckbox = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | CheckBox1: TCheckBox;
20 | CheckBox2: TCheckBox;
21 | ComboBox1: TComboBox;
22 | Edit1: TEdit;
23 | Edit5: TEdit;
24 | Edit6: TEdit;
25 | Label8: TLabel;
26 | Label9: TLabel;
27 | tinline: TEdit;
28 | Image1: TImage;
29 | Label6: TLabel;
30 | Panel1: TPanel;
31 | tclass: TEdit;
32 | tid: TEdit;
33 | Label1: TLabel;
34 | Label2: TLabel;
35 | Label4: TLabel;
36 | Label5: TLabel;
37 | procedure bcancelClick(Sender: TObject);
38 | procedure BitBtn1Click(Sender: TObject);
39 | procedure bokClick(Sender: TObject);
40 | procedure CancelButtonClick(Sender: TObject);
41 | procedure ComboBox1Change(Sender: TObject);
42 | procedure Edit1Change(Sender: TObject);
43 | procedure FormActivate(Sender: TObject);
44 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
45 | procedure FormCreate(Sender: TObject);
46 | procedure FormShow(Sender: TObject);
47 | private
48 | { private declarations }
49 | public
50 | { public declarations }
51 | end;
52 |
53 | var
54 | fInsertCheckbox: TfInsertCheckbox;
55 |
56 | implementation
57 |
58 | uses unit1;
59 |
60 | procedure TfInsertCheckbox.FormCreate(Sender: TObject);
61 | begin
62 |
63 | end;
64 |
65 | procedure TfInsertCheckbox.FormActivate(Sender: TObject);
66 | begin
67 | edit1.SetFocus;
68 | end;
69 |
70 | procedure TfInsertCheckbox.FormClose(Sender: TObject; var CloseAction: TCloseAction
71 | );
72 | begin
73 | CloseAction := caFree;
74 | end;
75 |
76 | procedure TfInsertCheckbox.CancelButtonClick(Sender: TObject);
77 | begin
78 | Close;
79 | end;
80 |
81 | procedure TfInsertCheckbox.ComboBox1Change(Sender: TObject);
82 | begin
83 | if (combobox1.ItemIndex=1) or (combobox1.ItemIndex=2) then edit6.Enabled:=true else edit6.Enabled:=false;
84 | end;
85 |
86 | procedure TfInsertCheckbox.Edit1Change(Sender: TObject);
87 | begin
88 | tid.text := edit1.text;
89 | end;
90 |
91 | procedure TfInsertCheckbox.BitBtn1Click(Sender: TObject);
92 | begin
93 |
94 | end;
95 |
96 | procedure TfInsertCheckbox.bcancelClick(Sender: TObject);
97 | begin
98 | Close;
99 | end;
100 |
101 | procedure TfInsertCheckbox.bokClick(Sender: TObject);
102 | var c:string;
103 | begin
104 | c:=c+' '' then c:=c+' name="'+edit1.text+'"';
106 | if edit5.text<>'' then c:=c+' value="'+edit5.text+'"';
107 | if checkbox1.checked then c:=c+' disabled="disabled"';
108 | if checkbox2.checked then c:=c+' checked="checked"';
109 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
110 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
111 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
112 | c:=c+' />';
113 | if combobox1.ItemIndex=1 then c:=c+#13#10+''+edit6.text+' ';
114 | if combobox1.ItemIndex=2 then c:=c+#13#10+''+edit6.text+' '+#13#10;
115 | InsertEditor(c);
116 | Close;
117 | end;
118 |
119 | procedure TfInsertCheckbox.FormShow(Sender: TObject);
120 | begin
121 |
122 | end;
123 |
124 | initialization
125 | {$I frminsertcheckbox.lrs}
126 |
127 | end.
128 |
129 |
--------------------------------------------------------------------------------
/source/frminsertcheckbox.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertcheckbox.ppu
--------------------------------------------------------------------------------
/source/frminsertdiv.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertdiv.o
--------------------------------------------------------------------------------
/source/frminsertdiv.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertDiv;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertDiv }
14 |
15 | TfInsertDiv = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | tinline: TEdit;
20 | Image1: TImage;
21 | Label6: TLabel;
22 | Panel1: TPanel;
23 | tclass: TEdit;
24 | tid: TEdit;
25 | Label4: TLabel;
26 | Label5: TLabel;
27 | procedure bcancelClick(Sender: TObject);
28 | procedure BitBtn1Click(Sender: TObject);
29 | procedure bokClick(Sender: TObject);
30 | procedure CancelButtonClick(Sender: TObject);
31 | procedure FormActivate(Sender: TObject);
32 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
33 | procedure FormCreate(Sender: TObject);
34 | procedure FormShow(Sender: TObject);
35 | private
36 | { private declarations }
37 | public
38 | { public declarations }
39 | end;
40 |
41 | var
42 | fInsertDiv: TfInsertDiv;
43 |
44 | implementation
45 |
46 | uses unit1;
47 |
48 | procedure TfInsertDiv.FormCreate(Sender: TObject);
49 | begin
50 |
51 | end;
52 |
53 | procedure TfInsertDiv.FormActivate(Sender: TObject);
54 | begin
55 | tclass.SetFocus;
56 | end;
57 |
58 | procedure TfInsertDiv.FormClose(Sender: TObject; var CloseAction: TCloseAction
59 | );
60 | begin
61 | CloseAction := caFree;
62 | end;
63 |
64 | procedure TfInsertDiv.CancelButtonClick(Sender: TObject);
65 | begin
66 | Close;
67 | end;
68 |
69 | procedure TfInsertDiv.BitBtn1Click(Sender: TObject);
70 | begin
71 |
72 | end;
73 |
74 | procedure TfInsertDiv.bcancelClick(Sender: TObject);
75 | begin
76 | Close;
77 | end;
78 |
79 | procedure TfInsertDiv.bokClick(Sender: TObject);
80 | var c:string;
81 | begin
82 | c:=''' then c:=c+' class="'+tclass.text+'"';
84 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
85 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
86 | c:=c+'>';
87 | InsertEditor(c,'
');
88 | Close;
89 | end;
90 |
91 | procedure TfInsertDiv.FormShow(Sender: TObject);
92 | begin
93 |
94 | end;
95 |
96 | initialization
97 | {$I frminsertdiv.lrs}
98 |
99 | end.
100 |
101 |
--------------------------------------------------------------------------------
/source/frminsertdiv.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertdiv.ppu
--------------------------------------------------------------------------------
/source/frminsertfieldset.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertfieldset.o
--------------------------------------------------------------------------------
/source/frminsertfieldset.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertFieldset;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertFieldset }
14 |
15 | TfInsertFieldset = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | Edit1: TEdit;
20 | tinline: TEdit;
21 | Image1: TImage;
22 | Label6: TLabel;
23 | Panel1: TPanel;
24 | tclass: TEdit;
25 | tid: TEdit;
26 | Label1: TLabel;
27 | Label4: TLabel;
28 | Label5: TLabel;
29 | procedure bcancelClick(Sender: TObject);
30 | procedure BitBtn1Click(Sender: TObject);
31 | procedure bokClick(Sender: TObject);
32 | procedure CancelButtonClick(Sender: TObject);
33 | procedure ComboBox1Change(Sender: TObject);
34 | procedure Edit1Change(Sender: TObject);
35 | procedure FormActivate(Sender: TObject);
36 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
37 | procedure FormCreate(Sender: TObject);
38 | procedure FormShow(Sender: TObject);
39 | private
40 | { private declarations }
41 | public
42 | { public declarations }
43 | end;
44 |
45 | var
46 | fInsertFieldset: TfInsertFieldset;
47 |
48 | implementation
49 |
50 | uses unit1;
51 |
52 | procedure TfInsertFieldset.FormCreate(Sender: TObject);
53 | begin
54 |
55 | end;
56 |
57 | procedure TfInsertFieldset.FormActivate(Sender: TObject);
58 | begin
59 | edit1.SetFocus;
60 | end;
61 |
62 | procedure TfInsertFieldset.FormClose(Sender: TObject; var CloseAction: TCloseAction
63 | );
64 | begin
65 | CloseAction := caFree;
66 | end;
67 |
68 | procedure TfInsertFieldset.CancelButtonClick(Sender: TObject);
69 | begin
70 | Close;
71 | end;
72 |
73 | procedure TfInsertFieldset.ComboBox1Change(Sender: TObject);
74 | begin
75 |
76 | end;
77 |
78 | procedure TfInsertFieldset.Edit1Change(Sender: TObject);
79 | begin
80 | tid.text := edit1.text;
81 | end;
82 |
83 | procedure TfInsertFieldset.BitBtn1Click(Sender: TObject);
84 | begin
85 |
86 | end;
87 |
88 | procedure TfInsertFieldset.bcancelClick(Sender: TObject);
89 | begin
90 | Close;
91 | end;
92 |
93 | procedure TfInsertFieldset.bokClick(Sender: TObject);
94 | var c:string;
95 | begin
96 | c:=c+''' then c:=c+' class="'+tclass.text+'"';
98 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
99 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
100 | c:=c+'>'+#13#10;
101 | c:=c+''+edit1.text+' '+#13#10;
102 | InsertEditor(c,' ');
103 | Close;
104 | end;
105 |
106 | procedure TfInsertFieldset.FormShow(Sender: TObject);
107 | begin
108 |
109 | end;
110 |
111 | initialization
112 | {$I frminsertfieldset.lrs}
113 |
114 | end.
115 |
116 |
--------------------------------------------------------------------------------
/source/frminsertfieldset.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertfieldset.ppu
--------------------------------------------------------------------------------
/source/frminsertflash.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertflash.o
--------------------------------------------------------------------------------
/source/frminsertflash.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertFlash;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertFlash }
14 |
15 | TfInsertFlash = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | BitBtn1: TBitBtn;
19 | bok: TBitBtn;
20 | Edit1: TEdit;
21 | Edit2: TEdit;
22 | Edit3: TEdit;
23 | Edit4: TEdit;
24 | Label3: TLabel;
25 | Label7: TLabel;
26 | OpenDialog1: TOpenDialog;
27 | tinline: TEdit;
28 | Image1: TImage;
29 | Label6: TLabel;
30 | Panel1: TPanel;
31 | tclass: TEdit;
32 | tid: TEdit;
33 | Label1: TLabel;
34 | Label2: TLabel;
35 | Label4: TLabel;
36 | Label5: TLabel;
37 | procedure bcancelClick(Sender: TObject);
38 | procedure BitBtn1Click(Sender: TObject);
39 | procedure bokClick(Sender: TObject);
40 | procedure CancelButtonClick(Sender: TObject);
41 | procedure FormActivate(Sender: TObject);
42 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
43 | procedure FormCreate(Sender: TObject);
44 | procedure FormShow(Sender: TObject);
45 | private
46 | { private declarations }
47 | public
48 | { public declarations }
49 | end;
50 |
51 | var
52 | fInsertFlash: TfInsertFlash;
53 |
54 | implementation
55 |
56 | uses unit1;
57 |
58 | procedure TfInsertFlash.FormCreate(Sender: TObject);
59 | begin
60 |
61 | end;
62 |
63 | procedure TfInsertFlash.FormActivate(Sender: TObject);
64 | begin
65 | edit1.SetFocus;
66 | end;
67 |
68 | procedure TfInsertFlash.FormClose(Sender: TObject; var CloseAction: TCloseAction
69 | );
70 | begin
71 | CloseAction := caFree;
72 | end;
73 |
74 | procedure TfInsertFlash.CancelButtonClick(Sender: TObject);
75 | begin
76 | Close;
77 | end;
78 |
79 | procedure TfInsertFlash.BitBtn1Click(Sender: TObject);
80 | begin
81 | if opendialog1.Execute then
82 | begin
83 | if opendialog1.FileName<>'' then edit1.Text:='file:///'+opendialog1.FileName;
84 | end;
85 | end;
86 |
87 | procedure TfInsertFlash.bcancelClick(Sender: TObject);
88 | begin
89 | Close;
90 | end;
91 |
92 | procedure TfInsertFlash.bokClick(Sender: TObject);
93 | var c:string;
94 | begin
95 | c:=''' then c:=c+' width="'+edit3.text+'"';
97 | if edit4.text<>'' then c:=c+' height="'+edit4.text+'"';
98 | if edit2.text<>'' then c:=c+' title="'+edit2.text+'"';
99 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
100 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
101 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
102 | c:=c+'>'+#13#10;
103 | c:=c+' '+#13#10;
104 | c:=c+' '+#13#10;
105 | c:=c+' '+#13#10;
106 | c:=c+' ';
107 | InsertEditor(c);
108 | Close;
109 | end;
110 |
111 | procedure TfInsertFlash.FormShow(Sender: TObject);
112 | begin
113 |
114 | end;
115 |
116 | initialization
117 | {$I frminsertflash.lrs}
118 |
119 | end.
120 |
121 |
--------------------------------------------------------------------------------
/source/frminsertflash.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertflash.ppu
--------------------------------------------------------------------------------
/source/frminsertform.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertform.o
--------------------------------------------------------------------------------
/source/frminsertform.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertForm;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertForm }
14 |
15 | TfInsertForm = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | ComboBox1: TComboBox;
20 | ComboBox2: TComboBox;
21 | Edit1: TEdit;
22 | Edit5: TEdit;
23 | Label3: TLabel;
24 | Label8: TLabel;
25 | OpenDialog1: TOpenDialog;
26 | tinline: TEdit;
27 | Image1: TImage;
28 | Label6: TLabel;
29 | Panel1: TPanel;
30 | tclass: TEdit;
31 | tid: TEdit;
32 | Label1: TLabel;
33 | Label2: TLabel;
34 | Label4: TLabel;
35 | Label5: TLabel;
36 | procedure bcancelClick(Sender: TObject);
37 | procedure BitBtn1Click(Sender: TObject);
38 | procedure bokClick(Sender: TObject);
39 | procedure CancelButtonClick(Sender: TObject);
40 | procedure Edit1Change(Sender: TObject);
41 | procedure FormActivate(Sender: TObject);
42 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
43 | procedure FormCreate(Sender: TObject);
44 | procedure FormShow(Sender: TObject);
45 | private
46 | { private declarations }
47 | public
48 | { public declarations }
49 | end;
50 |
51 | var
52 | fInsertForm: TfInsertForm;
53 |
54 | implementation
55 |
56 | uses unit1;
57 |
58 | procedure TfInsertForm.FormCreate(Sender: TObject);
59 | begin
60 |
61 | end;
62 |
63 | procedure TfInsertForm.FormActivate(Sender: TObject);
64 | begin
65 | edit1.SetFocus;
66 | end;
67 |
68 | procedure TfInsertForm.FormClose(Sender: TObject; var CloseAction: TCloseAction
69 | );
70 | begin
71 | CloseAction := caFree;
72 | end;
73 |
74 | procedure TfInsertForm.CancelButtonClick(Sender: TObject);
75 | begin
76 | Close;
77 | end;
78 |
79 | procedure TfInsertForm.Edit1Change(Sender: TObject);
80 | begin
81 | tid.text := edit1.text;
82 | end;
83 |
84 | procedure TfInsertForm.BitBtn1Click(Sender: TObject);
85 | begin
86 |
87 | end;
88 |
89 | procedure TfInsertForm.bcancelClick(Sender: TObject);
90 | begin
91 | Close;
92 | end;
93 |
94 | procedure TfInsertForm.bokClick(Sender: TObject);
95 | var c:string;
96 | begin
97 | c:='');
107 | Close;
108 | end;
109 |
110 | procedure TfInsertForm.FormShow(Sender: TObject);
111 | begin
112 |
113 | end;
114 |
115 | initialization
116 | {$I frminsertform.lrs}
117 |
118 | end.
119 |
120 |
--------------------------------------------------------------------------------
/source/frminsertform.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertform.ppu
--------------------------------------------------------------------------------
/source/frminserthidden.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserthidden.o
--------------------------------------------------------------------------------
/source/frminserthidden.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertHidden;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertHidden }
14 |
15 | TfInsertHidden = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | Edit1: TEdit;
20 | Edit5: TEdit;
21 | Label8: TLabel;
22 | tinline: TEdit;
23 | Image1: TImage;
24 | Label6: TLabel;
25 | Panel1: TPanel;
26 | tclass: TEdit;
27 | tid: TEdit;
28 | Label1: TLabel;
29 | Label4: TLabel;
30 | Label5: TLabel;
31 | procedure bcancelClick(Sender: TObject);
32 | procedure BitBtn1Click(Sender: TObject);
33 | procedure bokClick(Sender: TObject);
34 | procedure CancelButtonClick(Sender: TObject);
35 | procedure ComboBox1Change(Sender: TObject);
36 | procedure Edit1Change(Sender: TObject);
37 | procedure FormActivate(Sender: TObject);
38 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
39 | procedure FormCreate(Sender: TObject);
40 | procedure FormShow(Sender: TObject);
41 | private
42 | { private declarations }
43 | public
44 | { public declarations }
45 | end;
46 |
47 | var
48 | fInsertHidden: TfInsertHidden;
49 |
50 | implementation
51 |
52 | uses unit1;
53 |
54 | procedure TfInsertHidden.FormCreate(Sender: TObject);
55 | begin
56 |
57 | end;
58 |
59 | procedure TfInsertHidden.FormActivate(Sender: TObject);
60 | begin
61 | edit1.SetFocus;
62 | end;
63 |
64 | procedure TfInsertHidden.FormClose(Sender: TObject; var CloseAction: TCloseAction
65 | );
66 | begin
67 | CloseAction := caFree;
68 | end;
69 |
70 | procedure TfInsertHidden.CancelButtonClick(Sender: TObject);
71 | begin
72 | Close;
73 | end;
74 |
75 | procedure TfInsertHidden.ComboBox1Change(Sender: TObject);
76 | begin
77 |
78 | end;
79 |
80 | procedure TfInsertHidden.Edit1Change(Sender: TObject);
81 | begin
82 | tid.text := edit1.text;
83 | end;
84 |
85 | procedure TfInsertHidden.BitBtn1Click(Sender: TObject);
86 | begin
87 |
88 | end;
89 |
90 | procedure TfInsertHidden.bcancelClick(Sender: TObject);
91 | begin
92 | Close;
93 | end;
94 |
95 | procedure TfInsertHidden.bokClick(Sender: TObject);
96 | var c:string;
97 | begin
98 | c:=c+' '' then c:=c+' name="'+edit1.text+'"';
100 | if edit5.text<>'' then c:=c+' value="'+edit5.text+'"';
101 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
102 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
103 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
104 | c:=c+' />';
105 | InsertEditor(c);
106 | Close;
107 | end;
108 |
109 | procedure TfInsertHidden.FormShow(Sender: TObject);
110 | begin
111 |
112 | end;
113 |
114 | initialization
115 | {$I frminserthidden.lrs}
116 |
117 | end.
118 |
119 |
--------------------------------------------------------------------------------
/source/frminserthidden.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserthidden.ppu
--------------------------------------------------------------------------------
/source/frminsertimage.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertimage.o
--------------------------------------------------------------------------------
/source/frminsertimage.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertImage;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertImage }
14 |
15 | TfInsertImage = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | BitBtn1: TBitBtn;
19 | bok: TBitBtn;
20 | Edit1: TEdit;
21 | Edit2: TEdit;
22 | Edit3: TEdit;
23 | Label3: TLabel;
24 | OpenPictureDialog1: TOpenPictureDialog;
25 | tinline: TEdit;
26 | Image1: TImage;
27 | Label6: TLabel;
28 | Panel1: TPanel;
29 | tclass: TEdit;
30 | tid: TEdit;
31 | Label1: TLabel;
32 | Label2: TLabel;
33 | Label4: TLabel;
34 | Label5: TLabel;
35 | procedure bcancelClick(Sender: TObject);
36 | procedure BitBtn1Click(Sender: TObject);
37 | procedure bokClick(Sender: TObject);
38 | procedure CancelButtonClick(Sender: TObject);
39 | procedure FormActivate(Sender: TObject);
40 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
41 | procedure FormCreate(Sender: TObject);
42 | procedure FormShow(Sender: TObject);
43 | private
44 | { private declarations }
45 | public
46 | { public declarations }
47 | end;
48 |
49 | var
50 | fInsertImage: TfInsertImage;
51 |
52 | implementation
53 |
54 | uses unit1;
55 |
56 | procedure TfInsertImage.FormCreate(Sender: TObject);
57 | begin
58 |
59 | end;
60 |
61 | procedure TfInsertImage.FormActivate(Sender: TObject);
62 | begin
63 | edit1.SetFocus;
64 | end;
65 |
66 | procedure TfInsertImage.FormClose(Sender: TObject; var CloseAction: TCloseAction
67 | );
68 | begin
69 | CloseAction := caFree;
70 | end;
71 |
72 | procedure TfInsertImage.CancelButtonClick(Sender: TObject);
73 | begin
74 | Close;
75 | end;
76 |
77 | procedure TfInsertImage.BitBtn1Click(Sender: TObject);
78 | begin
79 | if openpicturedialog1.Execute then
80 | begin
81 | if openpicturedialog1.FileName<>'' then edit1.Text:='file:///'+openpicturedialog1.FileName;
82 | end;
83 | end;
84 |
85 | procedure TfInsertImage.bcancelClick(Sender: TObject);
86 | begin
87 | Close;
88 | end;
89 |
90 | procedure TfInsertImage.bokClick(Sender: TObject);
91 | var c:string;
92 | begin
93 | c:=' '' then c:=c+' src="'+edit1.text+'"' else c:=c+' href="#"';
95 | if edit2.text<>'' then c:=c+' alt="'+edit2.text+'"';
96 | if edit3.text<>'' then c:=c+' border="'+edit3.text+'"';
97 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
98 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
99 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
100 | c:=c+' />';
101 | InsertEditor(c);
102 | Close;
103 | end;
104 |
105 | procedure TfInsertImage.FormShow(Sender: TObject);
106 | begin
107 |
108 | end;
109 |
110 | initialization
111 | {$I frminsertimage.lrs}
112 |
113 | end.
114 |
115 |
--------------------------------------------------------------------------------
/source/frminsertimage.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertimage.ppu
--------------------------------------------------------------------------------
/source/frminsertlink.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertlink.o
--------------------------------------------------------------------------------
/source/frminsertlink.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertLink;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertLink }
14 |
15 | TfInsertLink = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | ComboBox1: TComboBox;
20 | Edit1: TEdit;
21 | Edit2: TEdit;
22 | tinline: TEdit;
23 | Image1: TImage;
24 | Label6: TLabel;
25 | Panel1: TPanel;
26 | tclass: TEdit;
27 | tid: TEdit;
28 | Label1: TLabel;
29 | Label2: TLabel;
30 | Label3: TLabel;
31 | Label4: TLabel;
32 | Label5: TLabel;
33 | procedure bcancelClick(Sender: TObject);
34 | procedure BitBtn1Click(Sender: TObject);
35 | procedure bokClick(Sender: TObject);
36 | procedure CancelButtonClick(Sender: TObject);
37 | procedure FormActivate(Sender: TObject);
38 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
39 | private
40 | { private declarations }
41 | public
42 | { public declarations }
43 | end;
44 |
45 | var
46 | fInsertLink: TfInsertLink;
47 |
48 | implementation
49 |
50 | uses unit1;
51 |
52 | procedure TfInsertLink.FormActivate(Sender: TObject);
53 | begin
54 | edit1.SetFocus;
55 | end;
56 |
57 | procedure TfInsertLink.FormClose(Sender: TObject; var CloseAction: TCloseAction
58 | );
59 | begin
60 | CloseAction := caFree;
61 | end;
62 |
63 | procedure TfInsertLink.CancelButtonClick(Sender: TObject);
64 | begin
65 | Close;
66 | end;
67 |
68 | procedure TfInsertLink.BitBtn1Click(Sender: TObject);
69 | begin
70 | Close;
71 | end;
72 |
73 | procedure TfInsertLink.bcancelClick(Sender: TObject);
74 | begin
75 | Close;
76 | end;
77 |
78 | procedure TfInsertLink.bokClick(Sender: TObject);
79 | var c:string;
80 | begin
81 | c:=''' then c:=c+' href="'+edit1.text+'"' else c:=c+' href="#"';
83 | if edit2.text<>'' then c:=c+' title="'+edit2.text+'"';
84 | if combobox1.text<>'' then c:=c+' target="'+combobox1.text+'"';
85 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
86 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
87 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
88 | c:=c+'>';
89 | InsertEditor(c,' ');
90 | Close;
91 | end;
92 |
93 | initialization
94 | {$I frminsertlink.lrs}
95 |
96 | end.
97 |
98 |
--------------------------------------------------------------------------------
/source/frminsertlink.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertlink.ppu
--------------------------------------------------------------------------------
/source/frminsertparagraph.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertparagraph.o
--------------------------------------------------------------------------------
/source/frminsertparagraph.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertParagraph;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertParagraph }
14 |
15 | TfInsertParagraph = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | tinline: TEdit;
20 | Image1: TImage;
21 | Label6: TLabel;
22 | Panel1: TPanel;
23 | tclass: TEdit;
24 | tid: TEdit;
25 | Label4: TLabel;
26 | Label5: TLabel;
27 | procedure bcancelClick(Sender: TObject);
28 | procedure BitBtn1Click(Sender: TObject);
29 | procedure bokClick(Sender: TObject);
30 | procedure CancelButtonClick(Sender: TObject);
31 | procedure FormActivate(Sender: TObject);
32 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
33 | procedure FormCreate(Sender: TObject);
34 | procedure FormShow(Sender: TObject);
35 | private
36 | { private declarations }
37 | public
38 | { public declarations }
39 | end;
40 |
41 | var
42 | fInsertParagraph: TfInsertParagraph;
43 |
44 | implementation
45 |
46 | uses unit1;
47 |
48 | procedure TfInsertParagraph.FormCreate(Sender: TObject);
49 | begin
50 |
51 | end;
52 |
53 | procedure TfInsertParagraph.FormActivate(Sender: TObject);
54 | begin
55 | tclass.SetFocus;
56 | end;
57 |
58 | procedure TfInsertParagraph.FormClose(Sender: TObject; var CloseAction: TCloseAction
59 | );
60 | begin
61 | CloseAction := caFree;
62 | end;
63 |
64 | procedure TfInsertParagraph.CancelButtonClick(Sender: TObject);
65 | begin
66 | Close;
67 | end;
68 |
69 | procedure TfInsertParagraph.BitBtn1Click(Sender: TObject);
70 | begin
71 |
72 | end;
73 |
74 | procedure TfInsertParagraph.bcancelClick(Sender: TObject);
75 | begin
76 | Close;
77 | end;
78 |
79 | procedure TfInsertParagraph.bokClick(Sender: TObject);
80 | var c:string;
81 | begin
82 | c:=''' then c:=c+' class="'+tclass.text+'"';
84 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
85 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
86 | c:=c+'>';
87 | InsertEditor(c,'
');
88 | Close;
89 | end;
90 |
91 | procedure TfInsertParagraph.FormShow(Sender: TObject);
92 | begin
93 |
94 | end;
95 |
96 | initialization
97 | {$I frminsertparagraph.lrs}
98 |
99 | end.
100 |
101 |
--------------------------------------------------------------------------------
/source/frminsertparagraph.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertparagraph.ppu
--------------------------------------------------------------------------------
/source/frminsertpassword.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertpassword.o
--------------------------------------------------------------------------------
/source/frminsertpassword.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertPassword;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertPassword }
14 |
15 | TfInsertPassword = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | CheckBox1: TCheckBox;
20 | ComboBox1: TComboBox;
21 | Edit1: TEdit;
22 | Edit2: TEdit;
23 | Edit5: TEdit;
24 | Edit6: TEdit;
25 | Label3: TLabel;
26 | Label8: TLabel;
27 | Label9: TLabel;
28 | tinline: TEdit;
29 | Image1: TImage;
30 | Label6: TLabel;
31 | Panel1: TPanel;
32 | tclass: TEdit;
33 | tid: TEdit;
34 | Label1: TLabel;
35 | Label2: TLabel;
36 | Label4: TLabel;
37 | Label5: TLabel;
38 | procedure bcancelClick(Sender: TObject);
39 | procedure BitBtn1Click(Sender: TObject);
40 | procedure bokClick(Sender: TObject);
41 | procedure CancelButtonClick(Sender: TObject);
42 | procedure ComboBox1Change(Sender: TObject);
43 | procedure Edit1Change(Sender: TObject);
44 | procedure FormActivate(Sender: TObject);
45 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
46 | procedure FormCreate(Sender: TObject);
47 | procedure FormShow(Sender: TObject);
48 | private
49 | { private declarations }
50 | public
51 | { public declarations }
52 | end;
53 |
54 | var
55 | fInsertPassword: TfInsertPassword;
56 |
57 | implementation
58 |
59 | uses unit1;
60 |
61 | procedure TfInsertPassword.FormCreate(Sender: TObject);
62 | begin
63 |
64 | end;
65 |
66 | procedure TfInsertPassword.FormActivate(Sender: TObject);
67 | begin
68 | edit1.SetFocus;
69 | end;
70 |
71 | procedure TfInsertPassword.FormClose(Sender: TObject; var CloseAction: TCloseAction
72 | );
73 | begin
74 | CloseAction := caFree;
75 | end;
76 |
77 | procedure TfInsertPassword.CancelButtonClick(Sender: TObject);
78 | begin
79 | Close;
80 | end;
81 |
82 | procedure TfInsertPassword.ComboBox1Change(Sender: TObject);
83 | begin
84 | if (combobox1.ItemIndex=1) or (combobox1.ItemIndex=2) then edit6.Enabled:=true else edit6.Enabled:=false;
85 | end;
86 |
87 | procedure TfInsertPassword.Edit1Change(Sender: TObject);
88 | begin
89 | tid.text := edit1.text;
90 | end;
91 |
92 | procedure TfInsertPassword.BitBtn1Click(Sender: TObject);
93 | begin
94 |
95 | end;
96 |
97 | procedure TfInsertPassword.bcancelClick(Sender: TObject);
98 | begin
99 | Close;
100 | end;
101 |
102 | procedure TfInsertPassword.bokClick(Sender: TObject);
103 | var c:string;
104 | begin
105 | if combobox1.ItemIndex=1 then c:=c+''+edit6.text+#13#10;
106 | if combobox1.ItemIndex=2 then c:=c+''+edit6.text+' '+#13#10;
107 | c:=c+' '' then c:=c+' name="'+edit1.text+'"';
109 | if edit5.text<>'' then c:=c+' value="'+edit5.text+'"';
110 | if edit2.text<>'' then c:=c+' maxlength="'+edit2.text+'"';
111 | if checkbox1.checked then c:=c+' disabled="disabled"';
112 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
113 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
114 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
115 | c:=c+' />';
116 | if combobox1.ItemIndex=1 then c:=c+#13#10+' ';
117 | InsertEditor(c);
118 | Close;
119 | end;
120 |
121 | procedure TfInsertPassword.FormShow(Sender: TObject);
122 | begin
123 |
124 | end;
125 |
126 | initialization
127 | {$I frminsertpassword.lrs}
128 |
129 | end.
130 |
131 |
--------------------------------------------------------------------------------
/source/frminsertpassword.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertpassword.ppu
--------------------------------------------------------------------------------
/source/frminsertradio.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertradio.o
--------------------------------------------------------------------------------
/source/frminsertradio.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertRadio;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertRadio }
14 |
15 | TfInsertRadio = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | CheckBox1: TCheckBox;
20 | CheckBox2: TCheckBox;
21 | ComboBox1: TComboBox;
22 | Edit1: TEdit;
23 | Edit5: TEdit;
24 | Edit6: TEdit;
25 | Label8: TLabel;
26 | Label9: TLabel;
27 | tinline: TEdit;
28 | Image1: TImage;
29 | Label6: TLabel;
30 | Panel1: TPanel;
31 | tclass: TEdit;
32 | tid: TEdit;
33 | Label1: TLabel;
34 | Label2: TLabel;
35 | Label4: TLabel;
36 | Label5: TLabel;
37 | procedure bcancelClick(Sender: TObject);
38 | procedure BitBtn1Click(Sender: TObject);
39 | procedure bokClick(Sender: TObject);
40 | procedure CancelButtonClick(Sender: TObject);
41 | procedure ComboBox1Change(Sender: TObject);
42 | procedure Edit1Change(Sender: TObject);
43 | procedure FormActivate(Sender: TObject);
44 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
45 | procedure FormCreate(Sender: TObject);
46 | procedure FormShow(Sender: TObject);
47 | private
48 | { private declarations }
49 | public
50 | { public declarations }
51 | end;
52 |
53 | var
54 | fInsertRadio: TfInsertRadio;
55 |
56 | implementation
57 |
58 | uses unit1;
59 |
60 | procedure TfInsertRadio.FormCreate(Sender: TObject);
61 | begin
62 |
63 | end;
64 |
65 | procedure TfInsertRadio.FormActivate(Sender: TObject);
66 | begin
67 | edit1.SetFocus;
68 | end;
69 |
70 | procedure TfInsertRadio.FormClose(Sender: TObject; var CloseAction: TCloseAction
71 | );
72 | begin
73 | CloseAction := caFree;
74 | end;
75 |
76 | procedure TfInsertRadio.CancelButtonClick(Sender: TObject);
77 | begin
78 | Close;
79 | end;
80 |
81 | procedure TfInsertRadio.ComboBox1Change(Sender: TObject);
82 | begin
83 | if (combobox1.ItemIndex=1) or (combobox1.ItemIndex=2) then edit6.Enabled:=true else edit6.Enabled:=false;
84 | end;
85 |
86 | procedure TfInsertRadio.Edit1Change(Sender: TObject);
87 | begin
88 | tid.text := edit1.text;
89 | end;
90 |
91 | procedure TfInsertRadio.BitBtn1Click(Sender: TObject);
92 | begin
93 |
94 | end;
95 |
96 | procedure TfInsertRadio.bcancelClick(Sender: TObject);
97 | begin
98 | Close;
99 | end;
100 |
101 | procedure TfInsertRadio.bokClick(Sender: TObject);
102 | var c:string;
103 | begin
104 | c:=c+' '' then c:=c+' name="'+edit1.text+'"';
106 | if edit5.text<>'' then c:=c+' value="'+edit5.text+'"';
107 | if checkbox1.checked then c:=c+' disabled="disabled"';
108 | if checkbox2.checked then c:=c+' checked="checked"';
109 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
110 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
111 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
112 | c:=c+' />';
113 | if combobox1.ItemIndex=1 then c:=c+#13#10+''+edit6.text+' ';
114 | if combobox1.ItemIndex=2 then c:=c+#13#10+''+edit6.text+' '+#13#10;
115 | InsertEditor(c);
116 | Close;
117 | end;
118 |
119 | procedure TfInsertRadio.FormShow(Sender: TObject);
120 | begin
121 |
122 | end;
123 |
124 | initialization
125 | {$I frminsertradio.lrs}
126 |
127 | end.
128 |
129 |
--------------------------------------------------------------------------------
/source/frminsertradio.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertradio.ppu
--------------------------------------------------------------------------------
/source/frminsertspan.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertspan.o
--------------------------------------------------------------------------------
/source/frminsertspan.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertSpan;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertSpan }
14 |
15 | TfInsertSpan = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | tinline: TEdit;
20 | Image1: TImage;
21 | Label6: TLabel;
22 | Panel1: TPanel;
23 | tclass: TEdit;
24 | tid: TEdit;
25 | Label4: TLabel;
26 | Label5: TLabel;
27 | procedure bcancelClick(Sender: TObject);
28 | procedure BitBtn1Click(Sender: TObject);
29 | procedure bokClick(Sender: TObject);
30 | procedure CancelButtonClick(Sender: TObject);
31 | procedure FormActivate(Sender: TObject);
32 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
33 | procedure FormCreate(Sender: TObject);
34 | procedure FormShow(Sender: TObject);
35 | private
36 | { private declarations }
37 | public
38 | { public declarations }
39 | end;
40 |
41 | var
42 | fInsertSpan: TfInsertSpan;
43 |
44 | implementation
45 |
46 | uses unit1;
47 |
48 | procedure TfInsertSpan.FormCreate(Sender: TObject);
49 | begin
50 |
51 | end;
52 |
53 | procedure TfInsertSpan.FormActivate(Sender: TObject);
54 | begin
55 | tclass.SetFocus;
56 | end;
57 |
58 | procedure TfInsertSpan.FormClose(Sender: TObject; var CloseAction: TCloseAction
59 | );
60 | begin
61 | CloseAction := caFree;
62 | end;
63 |
64 | procedure TfInsertSpan.CancelButtonClick(Sender: TObject);
65 | begin
66 | Close;
67 | end;
68 |
69 | procedure TfInsertSpan.BitBtn1Click(Sender: TObject);
70 | begin
71 |
72 | end;
73 |
74 | procedure TfInsertSpan.bcancelClick(Sender: TObject);
75 | begin
76 | Close;
77 | end;
78 |
79 | procedure TfInsertSpan.bokClick(Sender: TObject);
80 | var c:string;
81 | begin
82 | c:=''' then c:=c+' class="'+tclass.text+'"';
84 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
85 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
86 | c:=c+'>';
87 | InsertEditor(c,' ');
88 | Close;
89 | end;
90 |
91 | procedure TfInsertSpan.FormShow(Sender: TObject);
92 | begin
93 |
94 | end;
95 |
96 | initialization
97 | {$I frminsertspan.lrs}
98 |
99 | end.
100 |
101 |
--------------------------------------------------------------------------------
/source/frminsertspan.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminsertspan.ppu
--------------------------------------------------------------------------------
/source/frminserttable.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserttable.o
--------------------------------------------------------------------------------
/source/frminserttable.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertTable;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls, Spin, ExtDlgs;
10 |
11 | type
12 |
13 | { TfInsertTable }
14 |
15 | TfInsertTable = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | ComboBox1: TComboBox;
20 | ComboBox2: TComboBox;
21 | Label10: TLabel;
22 | Label11: TLabel;
23 | Label12: TLabel;
24 | Label3: TLabel;
25 | Label7: TLabel;
26 | Label8: TLabel;
27 | Label9: TLabel;
28 | SpinEdit1: TSpinEdit;
29 | SpinEdit2: TSpinEdit;
30 | SpinEdit3: TSpinEdit;
31 | SpinEdit4: TSpinEdit;
32 | SpinEdit5: TSpinEdit;
33 | tclass1: TEdit;
34 | tinline: TEdit;
35 | Image1: TImage;
36 | Label6: TLabel;
37 | Panel1: TPanel;
38 | tclass: TEdit;
39 | tid: TEdit;
40 | Label4: TLabel;
41 | Label5: TLabel;
42 | procedure bcancelClick(Sender: TObject);
43 | procedure BitBtn1Click(Sender: TObject);
44 | procedure bokClick(Sender: TObject);
45 | procedure CancelButtonClick(Sender: TObject);
46 | procedure FormActivate(Sender: TObject);
47 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
48 | procedure FormCreate(Sender: TObject);
49 | procedure FormShow(Sender: TObject);
50 | private
51 | { private declarations }
52 | public
53 | { public declarations }
54 | end;
55 |
56 | var
57 | fInsertTable: TfInsertTable;
58 |
59 | implementation
60 |
61 | uses unit1;
62 |
63 | procedure TfInsertTable.FormCreate(Sender: TObject);
64 | begin
65 |
66 | end;
67 |
68 | procedure TfInsertTable.FormActivate(Sender: TObject);
69 | begin
70 | spinedit2.SetFocus;
71 | end;
72 |
73 | procedure TfInsertTable.FormClose(Sender: TObject; var CloseAction: TCloseAction
74 | );
75 | begin
76 | CloseAction := caFree;
77 | end;
78 |
79 | procedure TfInsertTable.CancelButtonClick(Sender: TObject);
80 | begin
81 | Close;
82 | end;
83 |
84 | procedure TfInsertTable.BitBtn1Click(Sender: TObject);
85 | begin
86 |
87 | end;
88 |
89 | procedure TfInsertTable.bcancelClick(Sender: TObject);
90 | begin
91 | Close;
92 | end;
93 |
94 | procedure TfInsertTable.bokClick(Sender: TObject);
95 | var
96 | c:string;
97 | i,j:integer;
98 | begin
99 | c:=''' then c:=c+' width="'+tclass1.text+combobox1.text+'"';
104 | if combobox2.text<>'' then c:=c+' align="'+combobox2.text+'"';
105 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
106 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
107 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
108 | c:=c+'>'+#13#10;
109 |
110 | for i:=1 to spinedit2.value do
111 | begin
112 | c:=c+''+#13#10;
113 | for j:=1 to spinedit3.value do
114 | begin
115 | c:=c+' '+#13#10;
116 | end;
117 | c:=c+' '+#13#10;
118 | end;
119 |
120 | InsertEditor(c,'
');
121 | Close;
122 | end;
123 |
124 | procedure TfInsertTable.FormShow(Sender: TObject);
125 | begin
126 |
127 | end;
128 |
129 | initialization
130 | {$I frminserttable.lrs}
131 |
132 | end.
133 |
134 |
--------------------------------------------------------------------------------
/source/frminserttable.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserttable.ppu
--------------------------------------------------------------------------------
/source/frminserttextarea.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserttextarea.o
--------------------------------------------------------------------------------
/source/frminserttextarea.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertTextarea;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertTextarea }
14 |
15 | TfInsertTextarea = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | CheckBox1: TCheckBox;
20 | ComboBox1: TComboBox;
21 | Edit1: TEdit;
22 | Edit2: TEdit;
23 | Edit3: TEdit;
24 | Edit5: TEdit;
25 | Edit6: TEdit;
26 | Label3: TLabel;
27 | Label7: TLabel;
28 | Label8: TLabel;
29 | Label9: TLabel;
30 | tinline: TEdit;
31 | Image1: TImage;
32 | Label6: TLabel;
33 | Panel1: TPanel;
34 | tclass: TEdit;
35 | tid: TEdit;
36 | Label1: TLabel;
37 | Label2: TLabel;
38 | Label4: TLabel;
39 | Label5: TLabel;
40 | procedure bcancelClick(Sender: TObject);
41 | procedure BitBtn1Click(Sender: TObject);
42 | procedure bokClick(Sender: TObject);
43 | procedure CancelButtonClick(Sender: TObject);
44 | procedure ComboBox1Change(Sender: TObject);
45 | procedure Edit1Change(Sender: TObject);
46 | procedure FormActivate(Sender: TObject);
47 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
48 | procedure FormCreate(Sender: TObject);
49 | procedure FormShow(Sender: TObject);
50 | private
51 | { private declarations }
52 | public
53 | { public declarations }
54 | end;
55 |
56 | var
57 | fInsertTextarea: TfInsertTextarea;
58 |
59 | implementation
60 |
61 | uses unit1;
62 |
63 | procedure TfInsertTextarea.FormCreate(Sender: TObject);
64 | begin
65 |
66 | end;
67 |
68 | procedure TfInsertTextarea.FormActivate(Sender: TObject);
69 | begin
70 | edit1.SetFocus;
71 | end;
72 |
73 | procedure TfInsertTextarea.FormClose(Sender: TObject; var CloseAction: TCloseAction
74 | );
75 | begin
76 | CloseAction := caFree;
77 | end;
78 |
79 | procedure TfInsertTextarea.CancelButtonClick(Sender: TObject);
80 | begin
81 | Close;
82 | end;
83 |
84 | procedure TfInsertTextarea.ComboBox1Change(Sender: TObject);
85 | begin
86 | if (combobox1.ItemIndex=1) or (combobox1.ItemIndex=2) then edit6.Enabled:=true else edit6.Enabled:=false;
87 | end;
88 |
89 | procedure TfInsertTextarea.Edit1Change(Sender: TObject);
90 | begin
91 | tid.text := edit1.text;
92 | end;
93 |
94 | procedure TfInsertTextarea.BitBtn1Click(Sender: TObject);
95 | begin
96 |
97 | end;
98 |
99 | procedure TfInsertTextarea.bcancelClick(Sender: TObject);
100 | begin
101 | Close;
102 | end;
103 |
104 | procedure TfInsertTextarea.bokClick(Sender: TObject);
105 | var c:string;
106 | begin
107 | if combobox1.ItemIndex=1 then c:=c+''+edit6.text+#13#10;
108 | if combobox1.ItemIndex=2 then c:=c+''+edit6.text+' '+#13#10;
109 | c:=c+' ';
120 | InsertEditor(c,'');
121 | Close;
122 | end;
123 |
124 | procedure TfInsertTextarea.FormShow(Sender: TObject);
125 | begin
126 |
127 | end;
128 |
129 | initialization
130 | {$I frminserttextarea.lrs}
131 |
132 | end.
133 |
134 |
--------------------------------------------------------------------------------
/source/frminserttextarea.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserttextarea.ppu
--------------------------------------------------------------------------------
/source/frminserttextbox.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserttextbox.o
--------------------------------------------------------------------------------
/source/frminserttextbox.pas:
--------------------------------------------------------------------------------
1 | unit frmInsertTextbox;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | StdCtrls, ButtonPanel, Buttons, ExtCtrls;
10 |
11 | type
12 |
13 | { TfInsertTextbox }
14 |
15 | TfInsertTextbox = class(TForm)
16 | Bevel1: TBevel;
17 | bcancel: TBitBtn;
18 | bok: TBitBtn;
19 | CheckBox1: TCheckBox;
20 | ComboBox1: TComboBox;
21 | Edit1: TEdit;
22 | Edit2: TEdit;
23 | Edit5: TEdit;
24 | Edit6: TEdit;
25 | Label3: TLabel;
26 | Label8: TLabel;
27 | Label9: TLabel;
28 | tinline: TEdit;
29 | Image1: TImage;
30 | Label6: TLabel;
31 | Panel1: TPanel;
32 | tclass: TEdit;
33 | tid: TEdit;
34 | Label1: TLabel;
35 | Label2: TLabel;
36 | Label4: TLabel;
37 | Label5: TLabel;
38 | procedure bcancelClick(Sender: TObject);
39 | procedure BitBtn1Click(Sender: TObject);
40 | procedure bokClick(Sender: TObject);
41 | procedure CancelButtonClick(Sender: TObject);
42 | procedure ComboBox1Change(Sender: TObject);
43 | procedure Edit1Change(Sender: TObject);
44 | procedure FormActivate(Sender: TObject);
45 | procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
46 | procedure FormCreate(Sender: TObject);
47 | procedure FormShow(Sender: TObject);
48 | private
49 | { private declarations }
50 | public
51 | { public declarations }
52 | end;
53 |
54 | var
55 | fInsertTextbox: TfInsertTextbox;
56 |
57 | implementation
58 |
59 | uses unit1;
60 |
61 | procedure TfInsertTextbox.FormCreate(Sender: TObject);
62 | begin
63 |
64 | end;
65 |
66 | procedure TfInsertTextbox.FormActivate(Sender: TObject);
67 | begin
68 | edit1.SetFocus;
69 | end;
70 |
71 | procedure TfInsertTextbox.FormClose(Sender: TObject; var CloseAction: TCloseAction
72 | );
73 | begin
74 | CloseAction := caFree;
75 | end;
76 |
77 | procedure TfInsertTextbox.CancelButtonClick(Sender: TObject);
78 | begin
79 | Close;
80 | end;
81 |
82 | procedure TfInsertTextbox.ComboBox1Change(Sender: TObject);
83 | begin
84 | if (combobox1.ItemIndex=1) or (combobox1.ItemIndex=2) then edit6.Enabled:=true else edit6.Enabled:=false;
85 | end;
86 |
87 | procedure TfInsertTextbox.Edit1Change(Sender: TObject);
88 | begin
89 | tid.text := edit1.text;
90 | end;
91 |
92 | procedure TfInsertTextbox.BitBtn1Click(Sender: TObject);
93 | begin
94 |
95 | end;
96 |
97 | procedure TfInsertTextbox.bcancelClick(Sender: TObject);
98 | begin
99 | Close;
100 | end;
101 |
102 | procedure TfInsertTextbox.bokClick(Sender: TObject);
103 | var c:string;
104 | begin
105 | if combobox1.ItemIndex=1 then c:=c+''+edit6.text+#13#10;
106 | if combobox1.ItemIndex=2 then c:=c+''+edit6.text+' '+#13#10;
107 | c:=c+' '' then c:=c+' name="'+edit1.text+'"';
109 | if edit5.text<>'' then c:=c+' value="'+edit5.text+'"';
110 | if edit2.text<>'' then c:=c+' maxlength="'+edit2.text+'"';
111 | if checkbox1.checked then c:=c+' disabled="disabled"';
112 | if tclass.text<>'' then c:=c+' class="'+tclass.text+'"';
113 | if tid.text<>'' then c:=c+' id="'+tid.text+'"';
114 | if tinline.text<>'' then c:=c+' style="'+tinline.text+'"';
115 | c:=c+' />';
116 | if combobox1.ItemIndex=1 then c:=c+#13#10+' ';
117 | InsertEditor(c);
118 | Close;
119 | end;
120 |
121 | procedure TfInsertTextbox.FormShow(Sender: TObject);
122 | begin
123 |
124 | end;
125 |
126 | initialization
127 | {$I frminserttextbox.lrs}
128 |
129 | end.
130 |
131 |
--------------------------------------------------------------------------------
/source/frminserttextbox.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/frminserttextbox.ppu
--------------------------------------------------------------------------------
/source/link.res:
--------------------------------------------------------------------------------
1 | SEARCH_DIR(C:\Lazarus\components\synedit\units\i386-win32\)
2 | SEARCH_DIR(C:\Lazarus\ideintf\units\i386-win32\)
3 | SEARCH_DIR(C:\Lazarus\lcl\units\i386-win32\)
4 | SEARCH_DIR(C:\Lazarus\lcl\units\i386-win32\win32\)
5 | SEARCH_DIR(C:\Lazarus\packager\units\i386-win32\)
6 | SEARCH_DIR(.\)
7 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\)
8 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\zlib\)
9 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-jedi\)
10 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\)
11 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\winceunits\)
12 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\unzip\)
13 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\tcl\)
14 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\symbolic\)
15 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\sqlite\)
16 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\sdl\)
17 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\regexpr\)
18 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\pxlib\)
19 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\postgres\)
20 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\pcap\)
21 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\)
22 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\)
23 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\oracle\)
24 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\openssl\)
25 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\opengl\)
26 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\openal\)
27 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\oggvorbis\)
28 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\odbc\)
29 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\numlib\)
30 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\mysql\)
31 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\mad\)
32 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\libpng\)
33 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\libgd\)
34 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\lexyacc\)
35 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\imagemagick\)
36 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\ibase\)
37 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\httpd22\)
38 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\httpd20\)
39 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\httpd13\)
40 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\hash\)
41 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\gtk2\)
42 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\gtk1\)
43 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\graph\)
44 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\gdbint\)
45 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fv\)
46 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fppkg\)
47 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fpmkunit\)
48 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fpgtk\)
49 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fftw\)
50 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-xml\)
51 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-web\)
52 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-registry\)
53 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-process\)
54 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-passrc\)
55 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-net\)
56 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-json\)
57 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\)
58 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-fpcunit\)
59 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-db\)
60 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\)
61 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\chm\)
62 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\cdrom\)
63 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\cairo\)
64 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\bfd\)
65 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\a52\)
66 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\units\i386-win32\)
67 | SEARCH_DIR(C:\Lazarus\fpc\2.2.4\bin\i386-win32\)
68 | INPUT(
69 | D:\Belgelerim\Projeler\Delphi\LHtml\project1.o
70 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\system.o
71 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\lineinfo.o
72 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\exeinfo.o
73 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\strings.o
74 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\windows.o
75 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\objpas.o
76 | C:\Lazarus\lcl\units\i386-win32\win32\interfaces.o
77 | C:\Lazarus\lcl\units\i386-win32\forms.o
78 | D:\Belgelerim\Projeler\Delphi\LHtml\unit1.o
79 | C:\Lazarus\lcl\units\i386-win32\lresources.o
80 | C:\Lazarus\lcl\units\i386-win32\interfacebase.o
81 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\types.o
82 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\classes.o
83 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\sysutils.o
84 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\math.o
85 | C:\Lazarus\lcl\units\i386-win32\lclstrconsts.o
86 | C:\Lazarus\lcl\units\i386-win32\lcltype.o
87 | C:\Lazarus\lcl\units\i386-win32\lclproc.o
88 | C:\Lazarus\lcl\units\i386-win32\lmessages.o
89 | C:\Lazarus\lcl\units\i386-win32\graphtype.o
90 | C:\Lazarus\lcl\units\i386-win32\graphmath.o
91 | C:\Lazarus\lcl\units\i386-win32\themes.o
92 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\rtlconsts.o
93 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\typinfo.o
94 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\sysconst.o
95 | C:\Lazarus\lcl\units\i386-win32\fpcadds.o
96 | C:\Lazarus\lcl\units\i386-win32\avglvltree.o
97 | C:\Lazarus\lcl\units\i386-win32\fileutil.o
98 | C:\Lazarus\lcl\units\i386-win32\wsreferences.o
99 | C:\Lazarus\lcl\units\i386-win32\masks.o
100 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\contnrs.o
101 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\gettext.o
102 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\messages.o
103 | C:\Lazarus\lcl\units\i386-win32\tmschema.o
104 | C:\Lazarus\lcl\units\i386-win32\lclintf.o
105 | C:\Lazarus\lcl\units\i386-win32\graphics.o
106 | C:\Lazarus\lcl\units\i386-win32\imglist.o
107 | C:\Lazarus\lcl\units\i386-win32\dynqueue.o
108 | C:\Lazarus\lcl\units\i386-win32\lazconfigstorage.o
109 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpimage.o
110 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpcanvas.o
111 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpwritebmp.o
112 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpwritepng.o
113 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\pngcomn.o
114 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpreadpnm.o
115 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpwritepnm.o
116 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpreadjpeg.o
117 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpwritejpeg.o
118 | C:\Lazarus\lcl\units\i386-win32\intfgraphics.o
119 | C:\Lazarus\lcl\units\i386-win32\lclrescache.o
120 | C:\Lazarus\lcl\units\i386-win32\icnstypes.o
121 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\clipping.o
122 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\bmpcomn.o
123 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpimgcmn.o
124 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\zstream.o
125 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\zbase.o
126 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\gzio.o
127 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\dos.o
128 | C:\Lazarus\fpc\2.2.4\units\i386-win32\hash\crc.o
129 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\zdeflate.o
130 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\zinflate.o
131 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\trees.o
132 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\adler.o
133 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\infblock.o
134 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\infutil.o
135 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\infcodes.o
136 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\inftrees.o
137 | C:\Lazarus\fpc\2.2.4\units\i386-win32\paszlib\inffast.o
138 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jpeglib.o
139 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdapimin.o
140 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdatasrc.o
141 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdapistd.o
142 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jmorecfg.o
143 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdeferr.o
144 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jinclude.o
145 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jerror.o
146 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jmemmgr.o
147 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdmarker.o
148 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdinput.o
149 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcomapi.o
150 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jutils.o
151 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jmemnobs.o
152 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdmaster.o
153 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdcolor.o
154 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdsample.o
155 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdpostct.o
156 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jddctmgr.o
157 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdphuff.o
158 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdhuff.o
159 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdcoefct.o
160 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdmainct.o
161 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jquant1.o
162 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jquant2.o
163 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdmerge.o
164 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdct.o
165 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jidctfst.o
166 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jidctint.o
167 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jidctflt.o
168 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jidctred.o
169 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcapistd.o
170 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcapimin.o
171 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jdatadst.o
172 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcparam.o
173 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcinit.o
174 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcmarker.o
175 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcphuff.o
176 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jchuff.o
177 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcmaster.o
178 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jccolor.o
179 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcsample.o
180 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcprepct.o
181 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcdctmgr.o
182 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jccoefct.o
183 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jcmainct.o
184 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jfdctint.o
185 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jfdctfst.o
186 | C:\Lazarus\fpc\2.2.4\units\i386-win32\pasjpeg\jfdctflt.o
187 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpreadbmp.o
188 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-image\fpreadpng.o
189 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\syncobjs.o
190 | C:\Lazarus\lcl\units\i386-win32\lclclasses.o
191 | C:\Lazarus\lcl\units\i386-win32\wslclclasses.o
192 | C:\Lazarus\lcl\units\i386-win32\wsimglist.o
193 | C:\Lazarus\lcl\units\i386-win32\wsproc.o
194 | C:\Lazarus\lcl\units\i386-win32\wsfactory.o
195 | C:\Lazarus\lcl\units\i386-win32\controls.o
196 | C:\Lazarus\lcl\units\i386-win32\menus.o
197 | C:\Lazarus\lcl\units\i386-win32\utrace.o
198 | C:\Lazarus\lcl\units\i386-win32\propertystorage.o
199 | C:\Lazarus\lcl\units\i386-win32\actnlist.o
200 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\rttiutils.o
201 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\strutils.o
202 | C:\Lazarus\lcl\units\i386-win32\wsmenus.o
203 | C:\Lazarus\lcl\units\i386-win32\maps.o
204 | C:\Lazarus\lcl\units\i386-win32\lclversion.o
205 | C:\Lazarus\lcl\units\i386-win32\customtimer.o
206 | C:\Lazarus\lcl\units\i386-win32\clipbrd.o
207 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\custapp.o
208 | C:\Lazarus\lcl\units\i386-win32\helpintfs.o
209 | C:\Lazarus\lcl\units\i386-win32\wscontrols.o
210 | C:\Lazarus\lcl\units\i386-win32\wsforms.o
211 | C:\Lazarus\lcl\units\i386-win32\win32\win32int.o
212 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\activex.o
213 | C:\Lazarus\lcl\units\i386-win32\translations.o
214 | C:\Lazarus\lcl\units\i386-win32\comctrls.o
215 | C:\Lazarus\lcl\units\i386-win32\buttons.o
216 | C:\Lazarus\lcl\units\i386-win32\extctrls.o
217 | C:\Lazarus\lcl\units\i386-win32\stdctrls.o
218 | C:\Lazarus\lcl\units\i386-win32\win32\win32def.o
219 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\commctrl.o
220 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\variants.o
221 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\ctypes.o
222 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\varutils.o
223 | C:\Lazarus\lcl\units\i386-win32\stringhashlist.o
224 | C:\Lazarus\lcl\units\i386-win32\lconvencoding.o
225 | C:\Lazarus\lcl\units\i386-win32\toolwin.o
226 | C:\Lazarus\lcl\units\i386-win32\extendedstrings.o
227 | C:\Lazarus\lcl\units\i386-win32\textstrings.o
228 | C:\Lazarus\lcl\units\i386-win32\wsstdctrls.o
229 | C:\Lazarus\lcl\units\i386-win32\popupnotifier.o
230 | C:\Lazarus\lcl\units\i386-win32\wsextctrls.o
231 | C:\Lazarus\lcl\units\i386-win32\imagelistcache.o
232 | C:\Lazarus\lcl\units\i386-win32\wsbuttons.o
233 | C:\Lazarus\lcl\units\i386-win32\wscomctrls.o
234 | C:\Lazarus\lcl\units\i386-win32\wstoolwin.o
235 | C:\Lazarus\lcl\units\i386-win32\win32\win32proc.o
236 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsfactory.o
237 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsbuttons.o
238 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsextctrls.o
239 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsmenus.o
240 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsspin.o
241 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsstdctrls.o
242 | C:\Lazarus\lcl\units\i386-win32\win32\win32themes.o
243 | C:\Lazarus\lcl\units\i386-win32\arrow.o
244 | C:\Lazarus\lcl\units\i386-win32\calendar.o
245 | C:\Lazarus\lcl\units\i386-win32\spin.o
246 | C:\Lazarus\lcl\units\i386-win32\checklst.o
247 | C:\Lazarus\lcl\units\i386-win32\win32\win32extra.o
248 | C:\Lazarus\lcl\units\i386-win32\lclmessageglue.o
249 | C:\Lazarus\lcl\units\i386-win32\dialogs.o
250 | C:\Lazarus\lcl\units\i386-win32\buttonpanel.o
251 | C:\Lazarus\lcl\units\i386-win32\wsdialogs.o
252 | C:\Lazarus\lcl\units\i386-win32\extdlgs.o
253 | C:\Lazarus\lcl\units\i386-win32\grids.o
254 | C:\Lazarus\lcl\units\i386-win32\wscalendar.o
255 | C:\Lazarus\lcl\units\i386-win32\wsarrow.o
256 | C:\Lazarus\lcl\units\i386-win32\wsspin.o
257 | C:\Lazarus\lcl\units\i386-win32\wsextdlgs.o
258 | C:\Lazarus\lcl\units\i386-win32\wschecklst.o
259 | C:\Lazarus\lcl\units\i386-win32\dynamicarray.o
260 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-xml\xmlcfg.o
261 | C:\Lazarus\lcl\units\i386-win32\maskedit.o
262 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-xml\dom.o
263 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-xml\xmlread.o
264 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-xml\xmlwrite.o
265 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\avl_tree.o
266 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-xml\xmlutils.o
267 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\uriparser.o
268 | C:\Lazarus\lcl\units\i386-win32\wsgrids.o
269 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsarrow.o
270 | C:\Lazarus\lcl\units\i386-win32\win32\win32wscalendar.o
271 | C:\Lazarus\lcl\units\i386-win32\win32\win32wschecklst.o
272 | C:\Lazarus\lcl\units\i386-win32\win32\win32wscomctrls.o
273 | C:\Lazarus\lcl\units\i386-win32\win32\win32wscontrols.o
274 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsdialogs.o
275 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsextdlgs.o
276 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsforms.o
277 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsgrids.o
278 | C:\Lazarus\lcl\units\i386-win32\win32\win32wsimglist.o
279 | C:\Lazarus\lcl\units\i386-win32\win32\win32uxtheme.o
280 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\shlobj.o
281 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\shellapi.o
282 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\commdlg.o
283 | C:\Lazarus\components\synedit\units\i386-win32\synedit.o
284 | C:\Lazarus\components\synedit\units\i386-win32\synedittypes.o
285 | C:\Lazarus\components\synedit\units\i386-win32\syneditsearch.o
286 | C:\Lazarus\components\synedit\units\i386-win32\syneditkeycmds.o
287 | C:\Lazarus\components\synedit\units\i386-win32\syneditmousecmds.o
288 | C:\Lazarus\components\synedit\units\i386-win32\syneditmiscprocs.o
289 | C:\Lazarus\components\synedit\units\i386-win32\syneditpointclasses.o
290 | C:\Lazarus\components\synedit\units\i386-win32\synbeautifier.o
291 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarks.o
292 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkup.o
293 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkuphighall.o
294 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkupbracket.o
295 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkupwordgroup.o
296 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkupctrlmouselink.o
297 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkupspecialline.o
298 | C:\Lazarus\components\synedit\units\i386-win32\syneditmarkupselection.o
299 | C:\Lazarus\components\synedit\units\i386-win32\synedittextbase.o
300 | C:\Lazarus\components\synedit\units\i386-win32\synedittexttrimmer.o
301 | C:\Lazarus\components\synedit\units\i386-win32\syneditfoldedview.o
302 | C:\Lazarus\components\synedit\units\i386-win32\synedittexttabexpander.o
303 | C:\Lazarus\components\synedit\units\i386-win32\synedittextdoublewidthchars.o
304 | C:\Lazarus\components\synedit\units\i386-win32\syngutterbase.o
305 | C:\Lazarus\components\synedit\units\i386-win32\syngutter.o
306 | C:\Lazarus\components\synedit\units\i386-win32\synguttercodefolding.o
307 | C:\Lazarus\components\synedit\units\i386-win32\syngutterchanges.o
308 | C:\Lazarus\components\synedit\units\i386-win32\syngutterlinenumber.o
309 | C:\Lazarus\components\synedit\units\i386-win32\synguttermarks.o
310 | C:\Lazarus\components\synedit\units\i386-win32\syneditmiscclasses.o
311 | C:\Lazarus\components\synedit\units\i386-win32\synedittextbuffer.o
312 | C:\Lazarus\components\synedit\units\i386-win32\synedithighlighter.o
313 | C:\Lazarus\components\synedit\units\i386-win32\syntextdrawer.o
314 | C:\Lazarus\components\synedit\units\i386-win32\syneditlines.o
315 | C:\Lazarus\lcl\units\i386-win32\stdactns.o
316 | C:\Lazarus\components\synedit\units\i386-win32\synregexpr.o
317 | C:\Lazarus\components\synedit\units\i386-win32\syneditstrconst.o
318 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-registry\registry.o
319 | C:\Lazarus\fpc\2.2.4\units\i386-win32\fcl-base\inifiles.o
320 | C:\Lazarus\components\synedit\units\i386-win32\synedithighlighterfoldbase.o
321 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\sysinitpas.o
322 | )
323 | GROUP(
324 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\libimpsystem.a
325 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\libimpwindows.a
326 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\libimpsysutils.a
327 | C:\Lazarus\lcl\units\i386-win32\libimplclintf.a
328 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\libimpdos.a
329 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\libimpactivex.a
330 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\libimpcommctrl.a
331 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\libimpvarutils.a
332 | C:\Lazarus\lcl\units\i386-win32\win32\libimpwin32wsforms.a
333 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\libimpshlobj.a
334 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\libimpshellapi.a
335 | C:\Lazarus\fpc\2.2.4\units\i386-win32\winunits-base\libimpcommdlg.a
336 | C:\Lazarus\fpc\2.2.4\units\i386-win32\rtl\libimpsysinitpas.a
337 | )
338 | SEARCH_DIR("/usr/i686-pc-cygwin/lib"); SEARCH_DIR("/usr/lib"); SEARCH_DIR("/usr/lib/w32api");
339 | OUTPUT_FORMAT(pei-i386)
340 | ENTRY(_mainCRTStartup)
341 | SECTIONS
342 | {
343 | . = SIZEOF_HEADERS;
344 | . = ALIGN(__section_alignment__);
345 | .text __image_base__ + ( __section_alignment__ < 0x1000 ? . : __section_alignment__ ) :
346 | {
347 | *(.init)
348 | *(.text .stub .text.* .gnu.linkonce.t.*)
349 | *(SORT(.text$*))
350 | ___CTOR_LIST__ = .; __CTOR_LIST__ = . ;
351 | LONG (-1);*(.ctors); *(.ctor); *(SORT(.ctors.*)); LONG (0);
352 | ___DTOR_LIST__ = .; __DTOR_LIST__ = . ;
353 | LONG (-1); *(.dtors); *(.dtor); *(SORT(.dtors.*)); LONG (0);
354 | *(.fini)
355 | PROVIDE (etext = .);
356 | *(.gcc_except_table)
357 | }
358 | .data BLOCK(__section_alignment__) :
359 | {
360 | __data_start__ = . ;
361 | *(.data .data.* .gnu.linkonce.d.* .fpc*)
362 | *(.data2)
363 | *(SORT(.data$*))
364 | __data_end__ = . ;
365 | *(.data_cygwin_nocopy)
366 | }
367 | .rdata BLOCK(__section_alignment__) :
368 | {
369 | *(.rdata)
370 | *(.rodata .rodata.* .gnu.linkonce.r.*)
371 | *(SORT(.rdata$*))
372 | *(.eh_frame)
373 | ___RUNTIME_PSEUDO_RELOC_LIST__ = .;
374 | __RUNTIME_PSEUDO_RELOC_LIST__ = .;
375 | *(.rdata_runtime_pseudo_reloc)
376 | ___RUNTIME_PSEUDO_RELOC_LIST_END__ = .;
377 | __RUNTIME_PSEUDO_RELOC_LIST_END__ = .;
378 | }
379 | .pdata BLOCK(__section_alignment__) : { *(.pdata) }
380 | .bss BLOCK(__section_alignment__) :
381 | {
382 | __bss_start__ = . ;
383 | *(.bss .bss.* .gnu.linkonce.b.*)
384 | *(SORT(.bss$*))
385 | *(COMMON)
386 | __bss_end__ = . ;
387 | }
388 | .edata BLOCK(__section_alignment__) : { *(.edata) }
389 | .idata BLOCK(__section_alignment__) :
390 | {
391 | SORT(*)(.idata$2)
392 | SORT(*)(.idata$3)
393 | /* These zeroes mark the end of the import list. */
394 | LONG (0); LONG (0); LONG (0); LONG (0); LONG (0);
395 | SORT(*)(.idata$4)
396 | SORT(*)(.idata$5)
397 | SORT(*)(.idata$6)
398 | SORT(*)(.idata$7)
399 | }
400 | .CRT BLOCK(__section_alignment__) :
401 | {
402 | ___crt_xc_start__ = . ;
403 | *(SORT(.CRT$XC*)) /* C initialization */
404 | ___crt_xc_end__ = . ;
405 | ___crt_xi_start__ = . ;
406 | *(SORT(.CRT$XI*)) /* C++ initialization */
407 | ___crt_xi_end__ = . ;
408 | ___crt_xl_start__ = . ;
409 | *(SORT(.CRT$XL*)) /* TLS callbacks */
410 | /* ___crt_xl_end__ is defined in the TLS Directory support code */
411 | ___crt_xp_start__ = . ;
412 | *(SORT(.CRT$XP*)) /* Pre-termination */
413 | ___crt_xp_end__ = . ;
414 | ___crt_xt_start__ = . ;
415 | *(SORT(.CRT$XT*)) /* Termination */
416 | ___crt_xt_end__ = . ;
417 | }
418 | .tls BLOCK(__section_alignment__) :
419 | {
420 | ___tls_start__ = . ;
421 | *(.tls .tls.*)
422 | *(.tls$)
423 | *(SORT(.tls$*))
424 | ___tls_end__ = . ;
425 | }
426 | .rsrc BLOCK(__section_alignment__) :
427 | {
428 | *(.rsrc)
429 | *(SORT(.rsrc$*))
430 | }
431 | .reloc BLOCK(__section_alignment__) : { *(.reloc) }
432 | .stab BLOCK(__section_alignment__) (NOLOAD) : { *(.stab) }
433 | .stabstr BLOCK(__section_alignment__) (NOLOAD) : { *(.stabstr) }
434 | .debug_aranges BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_aranges) }
435 | .debug_pubnames BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_pubnames) }
436 | .debug_info BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_info) *(.gnu.linkonce.wi.*) }
437 | .debug_abbrev BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_abbrev) }
438 | .debug_line BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_line) }
439 | .debug_frame BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_frame) }
440 | .debug_str BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_str) }
441 | .debug_loc BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_loc) }
442 | .debug_macinfo BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_macinfo) }
443 | .debug_weaknames BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_weaknames) }
444 | .debug_funcnames BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_funcnames) }
445 | .debug_typenames BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_typenames) }
446 | .debug_varnames BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_varnames) }
447 | .debug_ranges BLOCK(__section_alignment__) (NOLOAD) : { *(.debug_ranges) }
448 | }
449 |
--------------------------------------------------------------------------------
/source/ppas.bat:
--------------------------------------------------------------------------------
1 | @echo off
2 | C:\Lazarus\fpc\2.2.4\bin\i386-win32\windres.exe --include C:/Lazarus/fpc/22D83D~1.4/bin/I386-W~1/ -O res -o D:\Belgelerim\Projeler\Delphi\LHtml\project1.res D:/BELGEL~1/Projeler/Delphi/LHtml/project1.rc --preprocessor=C:\Lazarus\fpc\2.2.4\bin\i386-win32\cpp.exe
3 | if errorlevel 1 goto linkend
4 | SET THEFILE=D:\Belgelerim\Projeler\Delphi\LHtml\project1.exe
5 | echo Linking %THEFILE%
6 | C:\Lazarus\fpc\2.2.4\bin\i386-win32\ld.exe -b pe-i386 -m i386pe --gc-sections --subsystem windows --entry=_WinMainCRTStartup -o D:\Belgelerim\Projeler\Delphi\LHtml\project1.exe D:\Belgelerim\Projeler\Delphi\LHtml\link.res
7 | if errorlevel 1 goto linkend
8 | C:\Lazarus\fpc\2.2.4\bin\i386-win32\postw32.exe --subsystem gui --input D:\Belgelerim\Projeler\Delphi\LHtml\project1.exe --stack 16777216
9 | if errorlevel 1 goto linkend
10 | goto end
11 | :asmend
12 | echo An error occured while assembling %THEFILE%
13 | goto end
14 | :linkend
15 | echo An error occured while linking %THEFILE%
16 | :end
17 |
--------------------------------------------------------------------------------
/source/project1.compiled:
--------------------------------------------------------------------------------
1 |
2 |
3 |
4 |
5 |
6 |
--------------------------------------------------------------------------------
/source/project1.ico:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/project1.ico
--------------------------------------------------------------------------------
/source/project1.lpi:
--------------------------------------------------------------------------------
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
10 |
11 |
12 |
13 |
14 |
15 |
16 |
17 |
18 |
19 |
20 |
21 |
22 |
23 |
24 |
25 |
26 |
27 |
28 |
29 |
30 |
31 |
32 |
33 |
34 |
35 |
36 |
37 |
38 |
39 |
40 |
41 |
42 |
43 |
44 |
45 |
46 |
47 |
48 |
49 |
50 |
51 |
52 |
53 |
54 |
55 |
56 |
57 |
58 |
59 |
60 |
61 |
62 |
63 |
64 |
65 |
66 |
67 |
68 |
69 |
70 |
71 |
72 |
73 |
74 |
75 |
76 |
77 |
78 |
79 |
80 |
81 |
82 |
83 |
84 |
85 |
86 |
87 |
88 |
89 |
90 |
91 |
92 |
93 |
94 |
95 |
96 |
97 |
98 |
99 |
100 |
101 |
102 |
103 |
104 |
105 |
106 |
107 |
108 |
109 |
110 |
111 |
112 |
113 |
114 |
115 |
116 |
117 |
118 |
119 |
120 |
121 |
122 |
123 |
124 |
125 |
126 |
127 |
128 |
129 |
130 |
131 |
132 |
133 |
134 |
135 |
136 |
137 |
138 |
139 |
140 |
141 |
142 |
143 |
144 |
145 |
146 |
147 |
148 |
149 |
150 |
151 |
152 |
153 |
154 |
155 |
156 |
157 |
158 |
159 |
160 |
161 |
162 |
163 |
164 |
165 |
166 |
167 |
168 |
169 |
170 |
171 |
172 |
173 |
174 |
175 |
176 |
177 |
178 |
179 |
180 |
181 |
182 |
183 |
184 |
185 |
186 |
187 |
188 |
189 |
190 |
191 |
192 |
193 |
194 |
195 |
196 |
197 |
198 |
199 |
200 |
201 |
202 |
203 |
204 |
205 |
206 |
207 |
208 |
209 |
210 |
211 |
212 |
213 |
214 |
215 |
216 |
217 |
218 |
219 |
220 |
221 |
222 |
223 |
224 |
225 |
226 |
227 |
228 |
229 |
230 |
231 |
232 |
233 |
234 |
235 |
236 |
237 |
238 |
239 |
240 |
241 |
242 |
243 |
244 |
245 |
246 |
247 |
248 |
249 |
250 |
251 |
252 |
253 |
254 |
255 |
256 |
257 |
258 |
259 |
260 |
261 |
262 |
263 |
264 |
265 |
266 |
267 |
268 |
269 |
270 |
271 |
272 |
273 |
274 |
275 |
276 |
277 |
278 |
279 |
280 |
281 |
282 |
283 |
284 |
285 |
286 |
287 |
288 |
289 |
290 |
291 |
292 |
293 |
294 |
295 |
296 |
297 |
298 |
299 |
300 |
301 |
302 |
303 |
304 |
305 |
306 |
307 |
308 |
309 |
310 |
311 |
312 |
313 |
314 |
315 |
316 |
317 |
318 |
319 |
320 |
321 |
322 |
323 |
324 |
325 |
326 |
327 |
328 |
329 |
330 |
331 |
332 |
333 |
334 |
335 |
336 |
337 |
338 |
339 |
340 |
341 |
342 |
343 |
344 |
345 |
346 |
347 |
348 |
349 |
350 |
351 |
352 |
353 |
354 |
355 |
356 |
357 |
358 |
359 |
360 |
361 |
362 |
363 |
364 |
365 |
366 |
367 |
368 |
369 |
370 |
371 |
372 |
373 |
374 |
375 |
376 |
377 |
378 |
379 |
380 |
381 |
382 |
383 |
384 |
385 |
386 |
387 |
388 |
389 |
390 |
391 |
392 |
393 |
394 |
395 |
396 |
397 |
398 |
399 |
400 |
401 |
402 |
403 |
404 |
405 |
406 |
407 |
408 |
409 |
410 |
411 |
412 |
413 |
414 |
415 |
416 |
417 |
418 |
419 |
420 |
421 |
422 |
423 |
424 |
425 |
426 |
427 |
428 |
429 |
430 |
431 |
432 |
433 |
434 |
435 |
436 |
437 |
438 |
439 |
440 |
441 |
442 |
443 |
444 |
445 |
446 |
447 |
448 |
449 |
450 |
451 |
452 |
453 |
454 |
455 |
456 |
457 |
458 |
459 |
460 |
461 |
462 |
463 |
464 |
465 |
466 |
467 |
468 |
469 |
470 |
471 |
472 |
473 |
474 |
475 |
476 |
477 |
478 |
479 |
480 |
481 |
482 |
483 |
484 |
485 |
486 |
487 |
488 |
489 |
490 |
491 |
492 |
493 |
494 |
495 |
496 |
497 |
498 |
499 |
500 |
501 |
502 |
503 |
504 |
505 |
506 |
507 |
508 |
509 |
510 |
511 |
512 |
513 |
514 |
515 |
516 |
517 |
518 |
519 |
520 |
521 |
522 |
523 |
524 |
525 |
526 |
527 |
528 |
529 |
530 |
531 |
532 |
533 |
534 |
535 |
536 |
537 |
538 |
539 |
540 |
541 |
542 |
543 |
544 |
545 |
546 |
547 |
548 |
549 |
550 |
551 |
552 |
553 |
554 |
555 |
556 |
557 |
558 |
559 |
560 |
561 |
562 |
563 |
564 |
565 |
566 |
567 |
568 |
569 |
570 |
571 |
572 |
573 |
574 |
575 |
576 |
--------------------------------------------------------------------------------
/source/project1.lpr:
--------------------------------------------------------------------------------
1 | program project1;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | uses
6 | {$IFDEF UNIX}{$IFDEF UseCThreads}
7 | cthreads,
8 | {$ENDIF}{$ENDIF}
9 | Interfaces, // this includes the LCL widgetset
10 | Forms, Unit1, LResources, Unit2;
11 |
12 | {$IFDEF WINDOWS}{$R project1.rc}{$ENDIF}
13 |
14 | begin
15 | Application.Title:='W3Edit';
16 | {$I project1.lrs}
17 | Application.Initialize;
18 | Application.CreateForm(TForm1, Form1);
19 | Application.Run;
20 | end.
21 |
22 |
--------------------------------------------------------------------------------
/source/project1.lrs:
--------------------------------------------------------------------------------
1 | LazarusResources.Add('MAINICON','ICO',[
2 | #0#0#1#0#1#0' '#0#0#1#0' '#0#168#16#0#0#22#0#0#0'('#0#0#0' '#0#0#0'@'#0#0#0#1
3 | +#0' '#0#0#0#0#0#0#16#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#255
4 | +#255#255#0#0#0#0#4#0#0#0#10#0#0#0#3#255#255#255#0#255#255#255#0#255#255#255#0
5 | +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
6 | +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
7 | +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
8 | +#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0#2#0#0#0#12#0#0#0#10#0#0#0#4
9 | +#255#255#255#0#255#255#255#0'}}}]'#148#148#148#235#147#147#147#255#147#147
10 | +#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147
11 | +#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255
12 | +#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147
13 | +#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147
14 | +#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147
15 | +#147#147#255#148#148#148#237'jjjn'#0#0#0#22#255#255#255#0#150#150#150#232#237
16 | +#237#237#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
17 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
18 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
19 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
20 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
21 | +#255#255#255#255#255#255#255#255#255#255#255#255#243#243#243#255#150#150#150
22 | +#234#0#0#0#13#255#255#255#0#147#147#147#255#255#255#255#255#235#235#235#255
23 | +#235#235#235#255#236#236#236#255#237#237#237#255#238#238#238#255#239#239#239
24 | +#255#240#240#240#255#241#241#241#255#241#241#241#255#242#242#242#255#243#243
25 | +#243#255#244#244#244#255#245#245#245#255#246#246#246#255#247#247#247#255#247
26 | +#247#247#255#248#248#248#255#249#249#249#255#250#250#250#255#251#251#251#255
27 | +#252#252#252#255#253#253#253#255#253#253#253#255#254#254#254#255#255#255#255
28 | +#255#255#255#255#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255
29 | +#255#0#147#147#147#255#255#255#255#255#234#234#234#255#235#235#235#255#236
30 | +#236#236#255#237#237#237#255#238#238#238#255#238#238#238#255#239#239#239#255
31 | +#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243#255#243#243#243
32 | +#255#244#244#244#255#245#245#245#255#246#246#246#255#247#247#247#255#248#248
33 | +#248#255#249#249#249#255#249#249#249#255#250#250#250#255#251#251#251#255#252
34 | +#252#252#255#253#253#253#255#254#254#254#255#255#255#255#255#255#255#255#255
35 | +#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255
36 | +#255#255#255#255#234#234#234#255#234#234#234#255#235#235#235#255#236#236#236
37 | +#255#237#237#237#255#238#238#238#255#239#239#239#255#240#240#240#255#240#240
38 | +#240#255#241#241#241#255#242#242#242#255#243#243#243#255#244#244#244#255#245
39 | +#245#245#255#246#246#246#255#246#246#246#255#247#247#247#255#248#248#248#255
40 | +#249#249#249#255#250#250#250#255#251#251#251#255#252#252#252#255#252#252#252
41 | +#255#253#253#253#255#254#254#254#255#255#255#255#255#255#255#255#255#147#147
42 | +#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255#233#233
43 | +#233#255#234#234#234#255#235#235#235#255#141#141#141#255#141#141#141#255#142
44 | +#142#142#255#142#142#142#255#143#143#143#255#144#144#144#255#144#144#144#255
45 | +#145#145#145#255#242#242#242#255#243#243#243#255#244#244#244#255#245#245#245
46 | +#255#246#246#246#255#247#247#247#255#248#248#248#255#248#248#248#255#249#249
47 | +#249#255#250#250#250#255#251#251#251#255#252#252#252#255#253#253#253#255#254
48 | +#254#254#255#254#254#254#255#255#255#255#255#147#147#147#255#255#255#255#0
49 | +#255#255#255#0#147#147#147#255#255#255#255#255#232#232#232#255#233#233#233
50 | +#255#234#234#234#255#235#235#235#255#236#236#236#255#237#237#237#255#238#238
51 | +#238#255#238#238#238#255#239#239#239#255#240#240#240#255#241#241#241#255#242
52 | +#242#242#255#243#243#243#255#244#244#244#255#244#244#244#255#245#245#245#255
53 | +#246#246#246#255#247#247#247#255#248#248#248#255#249#249#249#255#250#250#250
54 | +#255#250#250#250#255#251#251#251#255#252#252#252#255#253#253#253#255#254#254
55 | +#254#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147
56 | +#147#255#255#255#255#255#232#232#232#255#233#233#233#255#234#234#234#255#235
57 | +#235#235#255#235#235#235#255#236#236#236#255#237#237#237#255#238#238#238#255
58 | +#239#239#239#255#240#240#240#255#241#241#241#255#241#241#241#255#242#242#242
59 | +#255#243#243#243#255#244#244#244#255#245#245#245#255#246#246#246#255#246#246
60 | +#246#255#247#247#247#255#248#248#248#255#249#249#249#255#250#250#250#255#251
61 | +#251#251#255#252#252#252#255#252#252#252#255#253#253#253#255#255#255#255#255
62 | +#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255
63 | +#231#231#231#255#232#232#232#255#233#233#233#255#234#234#234#255#235#235#235
64 | +#255#236#236#236#255#237#237#237#255#237#237#237#255#238#238#238#255#239#239
65 | +#239#255#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243#255#243
66 | ,#243#243#255#244#244#244#255#245#245#245#255#246#246#246#255#247#247#247#255
67 | +#248#248#248#255#249#249#249#255#249#249#249#255#250#250#250#255#251#251#251
68 | +#255#252#252#252#255#253#253#253#255#255#255#255#255#147#147#147#255#255#255
69 | +#255#0#255#255#255#0#147#147#147#255#255#255#255#255#231#231#231#255#232#232
70 | +#232#255#233#233#233#255#148#148#148#255#148#148#148#255#149#149#149#255#149
71 | +#149#149#255#150#150#150#255#151#151#151#255#151#151#151#255#151#151#151#255
72 | +#152#152#152#255#153#153#153#255#153#153#153#255#154#154#154#255#155#155#155
73 | +#255#155#155#155#255#155#155#155#255#246#246#246#255#247#247#247#255#248#248
74 | +#248#255#249#249#249#255#250#250#250#255#251#251#251#255#251#251#251#255#252
75 | +#252#252#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147
76 | +#147#147#255#255#255#255#255#230#230#230#255#231#231#231#255#232#232#232#255
77 | +#233#233#233#255#234#234#234#255#235#235#235#255#235#235#235#255#236#236#236
78 | +#255#237#237#237#255#238#238#238#255#239#239#239#255#240#240#240#255#241#241
79 | +#241#255#241#241#241#255#242#242#242#255#243#243#243#255#244#244#244#255#245
80 | +#245#245#255#246#246#246#255#247#247#247#255#247#247#247#255#248#248#248#255
81 | +#249#249#249#255#250#250#250#255#251#251#251#255#252#252#252#255#255#255#255
82 | +#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255
83 | +#255#230#230#230#255#231#231#231#255#232#232#232#255#232#232#232#255#233#233
84 | +#233#255#234#234#234#255#235#235#235#255#236#236#236#255#237#237#237#255#238
85 | +#238#238#255#238#238#238#255#239#239#239#255#240#240#240#255#241#241#241#255
86 | +#242#242#242#255#243#243#243#255#243#243#243#255#244#244#244#255#245#245#245
87 | +#255#246#246#246#255#247#247#247#255#248#248#248#255#249#249#249#255#249#249
88 | +#249#255#250#250#250#255#251#251#251#255#255#255#255#255#147#147#147#255#255
89 | +#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255#229#229#229#255#230
90 | +#230#230#255#231#231#231#255#232#232#232#255#233#233#233#255#234#234#234#255
91 | +#234#234#234#255#235#235#235#255#236#236#236#255#237#237#237#255#238#238#238
92 | +#255#239#239#239#255#240#240#240#255#240#240#240#255#241#241#241#255#242#242
93 | +#242#255#243#243#243#255#244#244#244#255#245#245#245#255#246#246#246#255#246
94 | +#246#246#255#247#247#247#255#248#248#248#255#249#249#249#255#250#250#250#255
95 | +#251#251#251#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0
96 | +#147#147#147#255#255#255#255#255#229#229#229#255#230#230#230#255#230#230#230
97 | +#255#138#138#138#255#139#139#139#255#139#139#139#255#140#140#140#255#141#141
98 | +#141#255#141#141#141#255#141#141#141#255#142#142#142#255#142#142#142#255#143
99 | +#143#143#255#240#240#240#255#241#241#241#255#242#242#242#255#242#242#242#255
100 | +#243#243#243#255#244#244#244#255#245#245#245#255#246#246#246#255#247#247#247
101 | +#255#248#248#248#255#248#248#248#255#249#249#249#255#250#250#250#255#255#255
102 | +#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255
103 | +#255#255#228#228#228#255#229#229#229#255#230#230#230#255#231#231#231#255#232
104 | +#232#232#255#232#232#232#255#233#233#233#255#234#234#234#255#235#235#235#255
105 | +#236#236#236#255#237#237#237#255#238#238#238#255#238#238#238#255#239#239#239
106 | +#255#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243#255#244#244
107 | +#244#255#244#244#244#255#245#245#245#255#246#246#246#255#247#247#247#255#248
108 | +#248#248#255#249#249#249#255#250#250#250#255#255#255#255#255#147#147#147#255
109 | +#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255#228#228#228#255
110 | +#229#229#229#255#229#229#229#255#230#230#230#255#231#231#231#255#232#232#232
111 | +#255#233#233#233#255#234#234#234#255#235#235#235#255#235#235#235#255#236#236
112 | +#236#255#237#237#237#255#238#238#238#255#239#239#239#255#240#240#240#255#241
113 | +#241#241#255#241#241#241#255#242#242#242#255#243#243#243#255#244#244#244#255
114 | +#245#245#245#255#246#246#246#255#246#246#246#255#247#247#247#255#248#248#248
115 | +#255#249#249#249#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255
116 | +#255#0#147#147#147#255#255#255#255#255#227#227#227#255#228#228#228#255#229
117 | +#229#229#255#230#230#230#255#231#231#231#255#231#231#231#255#232#232#232#255
118 | +#233#233#233#255#234#234#234#255#235#235#235#255#236#236#236#255#237#237#237
119 | +#255#237#237#237#255#238#238#238#255#239#239#239#255#240#240#240#255#241#241
120 | +#241#255#242#242#242#255#243#243#243#255#243#243#243#255#244#244#244#255#245
121 | +#245#245#255#246#246#246#255#247#247#247#255#248#248#248#255#249#249#249#255
122 | +#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255
123 | +#255#255#255#255#227#227#227#255#227#227#227#255#228#228#228#255#137#137#137
124 | +#255#138#138#138#255#138#138#138#255#139#139#139#255#139#139#139#255#139#139
125 | +#139#255#140#140#140#255#141#141#141#255#141#141#141#255#142#142#142#255#142
126 | +#142#142#255#143#143#143#255#143#143#143#255#144#144#144#255#144#144#144#255
127 | +#145#145#145#255#145#145#145#255#244#244#244#255#245#245#245#255#245#245#245
128 | +#255#246#246#246#255#247#247#247#255#248#248#248#255#255#255#255#255#147#147
129 | +#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255#226#226
130 | ,#226#255#227#227#227#255#228#228#228#255#229#229#229#255#230#230#230#255#230
131 | +#230#230#255#231#231#231#255#232#232#232#255#233#233#233#255#234#234#234#255
132 | +#235#235#235#255#235#235#235#255#236#236#236#255#237#237#237#255#238#238#238
133 | +#255#239#239#239#255#240#240#240#255#241#241#241#255#241#241#241#255#242#242
134 | +#242#255#243#243#243#255#244#244#244#255#245#245#245#255#246#246#246#255#247
135 | +#247#247#255#247#247#247#255#255#255#255#255#147#147#147#255#255#255#255#0
136 | +#255#255#255#0#147#147#147#255#255#255#255#255#226#226#226#255#226#226#226
137 | +#255#227#227#227#255#228#228#228#255#229#229#229#255#230#230#230#255#231#231
138 | +#231#255#232#232#232#255#232#232#232#255#233#233#233#255#234#234#234#255#235
139 | +#235#235#255#236#236#236#255#237#237#237#255#238#238#238#255#238#238#238#255
140 | +#239#239#239#255#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243
141 | +#255#244#244#244#255#244#244#244#255#245#245#245#255#246#246#246#255#247#247
142 | +#247#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147
143 | +#147#255#255#255#255#255#225#225#225#255#226#226#226#255#227#227#227#255#228
144 | +#228#228#255#228#228#228#255#229#229#229#255#230#230#230#255#231#231#231#255
145 | +#232#232#232#255#233#233#233#255#234#234#234#255#234#234#234#255#235#235#235
146 | +#255#236#236#236#255#237#237#237#255#238#238#238#255#239#239#239#255#240#240
147 | +#240#255#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243#255#244
148 | +#244#244#255#245#245#245#255#246#246#246#255#246#246#246#255#255#255#255#255
149 | +#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255
150 | +#224#224#224#255#225#225#225#255#226#226#226#255#136#136#136#255#136#136#136
151 | +#255#137#137#137#255#138#138#138#255#138#138#138#255#138#138#138#255#139#139
152 | +#139#255#139#139#139#255#140#140#140#255#141#141#141#255#141#141#141#255#141
153 | +#141#141#255#142#142#142#255#142#142#142#255#143#143#143#255#144#144#144#255
154 | +#144#144#144#255#145#145#145#255#145#145#145#255#145#145#145#255#244#244#244
155 | +#255#245#245#245#255#246#246#246#255#255#255#255#255#147#147#147#255#255#255
156 | +#255#0#255#255#255#0#147#147#147#255#255#255#255#255#224#224#224#255#225#225
157 | +#225#255#226#226#226#255#227#227#227#255#227#227#227#255#228#228#228#255#229
158 | +#229#229#255#230#230#230#255#231#231#231#255#232#232#232#255#232#232#232#255
159 | +#233#233#233#255#234#234#234#255#235#235#235#255#236#236#236#255#237#237#237
160 | +#255#238#238#238#255#239#239#239#255#239#239#239#255#240#240#240#255#241#241
161 | +#241#255#242#242#242#255#243#243#243#255#244#244#244#255#244#244#244#255#245
162 | +#245#245#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147
163 | +#147#147#255#255#255#255#255#223#223#223#255#224#224#224#255#225#225#225#255
164 | +#226#226#226#255#227#227#227#255#228#228#228#255#229#229#229#255#229#229#229
165 | +#255#230#230#230#255#231#231#231#255#232#232#232#255#233#233#233#255#234#234
166 | +#234#255#235#235#235#255#235#235#235#255#236#236#236#255#237#237#237#255#238
167 | +#238#238#255#239#239#239#255#240#240#240#255#241#241#241#255#241#241#241#255
168 | +#242#242#242#255#243#243#243#255#244#244#244#255#245#245#245#255#255#255#255
169 | +#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255#255
170 | +#255#223#223#223#255#224#224#224#255#225#225#225#255#219#219#219#255#220#220
171 | +#220#255#221#221#221#255#222#222#222#255#223#223#223#255#224#224#224#255#225
172 | +#225#225#255#225#225#225#255#226#226#226#255#227#227#227#255#228#228#228#255
173 | +#229#229#229#255#236#236#236#255#237#237#237#255#237#237#237#255#238#238#238
174 | +#255#239#239#239#255#240#240#240#255#241#241#241#255#242#242#242#255#243#243
175 | +#243#255#243#243#243#255#244#244#244#255#255#255#255#255#147#147#147#255#255
176 | +#255#255#0#255#255#255#0#147#147#147#255#255#255#255#255#222#222#222#255#223
177 | +#223#223#255#224#224#224#255#135#135#135#255#135#135#135#255#136#136#136#255
178 | +#136#136#136#255#136#136#136#255#137#137#137#255#138#138#138#255#138#138#138
179 | +#255#139#139#139#255#139#139#139#255#139#139#139#255#140#140#140#255#235#235
180 | +#235#255#236#236#236#255#237#237#237#255#238#238#238#255#239#239#239#255#239
181 | +#239#239#255#240#240#240#255#241#241#241#255#242#242#242#255#243#243#243#255
182 | +#244#244#244#255#255#255#255#255#147#147#147#255#255#255#255#0#255#255#255#0
183 | +#147#147#147#255#255#255#255#255#222#222#222#255#223#223#223#255#224#224#224
184 | +#255#224#224#224#255#225#225#225#255#226#226#226#255#227#227#227#255#228#228
185 | +#228#255#229#229#229#255#230#230#230#255#230#230#230#255#231#231#231#255#232
186 | +#232#232#255#233#233#233#255#234#234#234#255#235#235#235#255#236#236#236#255
187 | +#236#236#236#255#237#237#237#255#238#238#238#255#239#239#239#255#240#240#240
188 | +#255#241#241#241#255#242#242#242#255#242#242#242#255#243#243#243#255#255#255
189 | +#255#255#147#147#147#255#255#255#255#0#255#255#255#0#147#147#147#255#255#255
190 | +#255#255#222#222#222#255#222#222#222#255#223#223#223#255#224#224#224#255#225
191 | +#225#225#255#226#226#226#255#226#226#226#255#227#227#227#255#228#228#228#255
192 | +#229#229#229#255#230#230#230#255#231#231#231#255#232#232#232#255#232#232#232
193 | +#255#233#233#233#255#234#234#234#255#235#235#235#255#236#236#236#255#237#237
194 | ,#237#255#238#238#238#255#238#238#238#255#239#239#239#255#240#240#240#255#241
195 | +#241#241#255#242#242#242#255#243#243#243#255#255#255#255#255#147#147#147#255
196 | +#255#255#255#0#255#255#255#0#150#150#150#231#233#233#233#255#255#255#255#255
197 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
198 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
199 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
200 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
201 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
202 | +#255#255#255#255#255#239#239#239#255#151#151#151#231#255#255#255#0#255#255
203 | +#255#0#150#150#150'N'#150#150#150#231#147#147#147#255#147#147#147#255#147#147
204 | +#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147
205 | +#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255
206 | +#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147
207 | +#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147
208 | +#147#255#147#147#147#255#147#147#147#255#147#147#147#255#147#147#147#255#151
209 | +#151#151#231#150#150#150'N'#255#255#255#0#255#255#255#0#255#255#255#0#255#255
210 | +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
211 | +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
212 | +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
213 | +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
214 | +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
215 | +#255#255#0#255#255#255#0#255#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
216 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
217 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
218 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
219 | ]);
220 |
221 |
--------------------------------------------------------------------------------
/source/project1.manifest:
--------------------------------------------------------------------------------
1 |
2 |
3 |
4 | Your application description here.
5 |
6 |
7 |
8 |
9 |
10 |
11 |
12 |
13 |
14 |
15 |
16 |
17 |
--------------------------------------------------------------------------------
/source/project1.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/project1.o
--------------------------------------------------------------------------------
/source/project1.or:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/project1.or
--------------------------------------------------------------------------------
/source/project1.pas:
--------------------------------------------------------------------------------
1 | program project1;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | uses
6 | {$IFDEF UNIX}{$IFDEF UseCThreads}
7 | cthreads,
8 | {$ENDIF}{$ENDIF}
9 | Interfaces, // this includes the LCL widgetset
10 | Forms, Unit1, LResources, Unit2, frmInsertParagraph, frmInsertLink;
11 |
12 | {$IFDEF WINDOWS}{$R project1.rc}{$ENDIF}
13 |
14 | begin
15 | {$I project1.lrs}
16 | Application.Title:='W3Edit';
17 | Application.Initialize;
18 | Application.CreateForm(TForm1, Form1);
19 | Application.Run;
20 | end.
21 |
22 |
--------------------------------------------------------------------------------
/source/project1.rc:
--------------------------------------------------------------------------------
1 | 1 VERSIONINFO
2 | FILEVERSION 1,0,0,587
3 | PRODUCTVERSION 1,0,0,124
4 | {
5 | BLOCK "StringFileInfo"
6 | {
7 | BLOCK "040904E4"
8 | {
9 | VALUE "Comments", "\000"
10 | VALUE "CompanyName", "\000"
11 | VALUE "FileDescription", "\000"
12 | VALUE "FileVersion", "1.0.0.587\000"
13 | VALUE "InternalName", "\000"
14 | VALUE "LegalCopyright", "\000"
15 | VALUE "LegalTrademarks", "\000"
16 | VALUE "OriginalFilename", "\000"
17 | VALUE "ProductName", "\000"
18 | VALUE "ProductVersion", "1.0.0.124\000"
19 | }
20 | }
21 | BLOCK "VarFileInfo"
22 | {
23 | VALUE "Translation", 0x0409, 0x04E4
24 | }
25 | }
26 |
27 | #define RT_MANIFEST 24
28 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1
29 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2
30 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3
31 |
32 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "project1.manifest"
33 | MAINICON ICON "project1.ico"
34 |
--------------------------------------------------------------------------------
/source/project1.res:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/project1.res
--------------------------------------------------------------------------------
/source/unit1.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/unit1.o
--------------------------------------------------------------------------------
/source/unit1.pas:
--------------------------------------------------------------------------------
1 | unit Unit1;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | ButtonPanel, ComCtrls, ExtCtrls, StdCtrls, Buttons, ColorBox, Menus, SynEdit,
10 | SynHighlighterHTML, SynEditKeyCmds, ShellAPI, LCLType, Spin, Unit2;
11 |
12 | type
13 |
14 | { TForm1 }
15 |
16 | TForm1 = class(TForm)
17 | BaseEditor: TSynEdit;
18 | ColorButton1: TColorButton;
19 | Edit1: TEdit;
20 | Image1: TImage;
21 | Image2: TImage;
22 | Image3: TImage;
23 | Image4: TImage;
24 | ImageList1: TImageList;
25 | Label1: TLabel;
26 | Label2: TLabel;
27 | Label3: TLabel;
28 | Label4: TLabel;
29 | Label5: TLabel;
30 | Label6: TLabel;
31 | MenuItem1: TMenuItem;
32 | MenuItem10: TMenuItem;
33 | MenuItem11: TMenuItem;
34 | MenuItem12: TMenuItem;
35 | MenuItem13: TMenuItem;
36 | MenuItem14: TMenuItem;
37 | MenuItem15: TMenuItem;
38 | MenuItem16: TMenuItem;
39 | MenuItem17: TMenuItem;
40 | MenuItem18: TMenuItem;
41 | MenuItem19: TMenuItem;
42 | MenuItem2: TMenuItem;
43 | MenuItem20: TMenuItem;
44 | MenuItem21: TMenuItem;
45 | MenuItem22: TMenuItem;
46 | MenuItem23: TMenuItem;
47 | MenuItem3: TMenuItem;
48 | MenuItem4: TMenuItem;
49 | MenuItem5: TMenuItem;
50 | MenuItem6: TMenuItem;
51 | MenuItem7: TMenuItem;
52 | MenuItem8: TMenuItem;
53 | MenuItem9: TMenuItem;
54 | PageControl1: TPageControl;
55 | Panel1: TPanel;
56 | Panel2: TPanel;
57 | Panel3: TPanel;
58 | Panel4: TPanel;
59 | PopupMenu1: TPopupMenu;
60 | PopupMenu2: TPopupMenu;
61 | PopupMenu3: TPopupMenu;
62 | PopupMenu4: TPopupMenu;
63 | SaveDialog1: TSaveDialog;
64 | ScrollBox1: TScrollBox;
65 | ScrollBox2: TScrollBox;
66 | SpeedButton10: TSpeedButton;
67 | SpeedButton11: TSpeedButton;
68 | SpeedButton12: TSpeedButton;
69 | SpeedButton13: TSpeedButton;
70 | SpeedButton14: TSpeedButton;
71 | SpeedButton15: TSpeedButton;
72 | SpeedButton16: TSpeedButton;
73 | SpeedButton17: TSpeedButton;
74 | SpeedButton18: TSpeedButton;
75 | SpeedButton19: TSpeedButton;
76 | SpeedButton20: TSpeedButton;
77 | SpeedButton21: TSpeedButton;
78 | SpeedButton22: TSpeedButton;
79 | SpeedButton23: TSpeedButton;
80 | SpeedButton24: TSpeedButton;
81 | SpeedButton25: TSpeedButton;
82 | SpeedButton26: TSpeedButton;
83 | SpeedButton27: TSpeedButton;
84 | SpeedButton28: TSpeedButton;
85 | SpeedButton29: TSpeedButton;
86 | SpeedButton30: TSpeedButton;
87 | SpeedButton31: TSpeedButton;
88 | SpeedButton32: TSpeedButton;
89 | SpeedButton33: TSpeedButton;
90 | SpeedButton34: TSpeedButton;
91 | SpeedButton35: TSpeedButton;
92 | SpeedButton36: TSpeedButton;
93 | SpeedButton37: TSpeedButton;
94 | SpeedButton5: TSpeedButton;
95 | SpeedButton7: TSpeedButton;
96 | SpeedButton8: TSpeedButton;
97 | SpeedButton9: TSpeedButton;
98 | SpinEdit1: TSpinEdit;
99 | SpinEdit2: TSpinEdit;
100 | SpinEdit3: TSpinEdit;
101 | Splitter1: TSplitter;
102 | Splitter2: TSplitter;
103 | StatusBar1: TStatusBar;
104 | SynHTMLSyn1: TSynHTMLSyn;
105 | tmrPanel: TTimer;
106 | tool1: TPanel;
107 | tool1c: TPanel;
108 | tool1c1: TPanel;
109 | tool1c2: TPanel;
110 | tool1c3: TPanel;
111 | tool2: TPanel;
112 | tool3: TPanel;
113 | tool4: TPanel;
114 | ToolBar1: TToolBar;
115 | ToolButton1: TToolButton;
116 | ToolButton10: TToolButton;
117 | ToolButton11: TToolButton;
118 | ToolButton12: TToolButton;
119 | ToolButton2: TToolButton;
120 | ToolButton3: TToolButton;
121 | ToolButton4: TToolButton;
122 | ToolButton5: TToolButton;
123 | ToolButton6: TToolButton;
124 | ToolButton7: TToolButton;
125 | ToolButton8: TToolButton;
126 | ToolButton9: TToolButton;
127 | procedure BaseEditorClick(Sender: TObject);
128 | procedure BaseEditorKeyDown(Sender: TObject; var Key: Word;
129 | Shift: TShiftState);
130 | procedure BaseEditorProcessCommand(Sender: TObject;
131 | var Command: TSynEditorCommand; var AChar: TUTF8Char; Data: pointer);
132 | procedure BaseEditorStatusChange(Sender: TObject; Changes: TSynStatusChanges
133 | );
134 | procedure Button1Click(Sender: TObject);
135 | procedure ColorButton1ColorChanged(Sender: TObject);
136 | procedure FormCreate(Sender: TObject);
137 | procedure FormShow(Sender: TObject);
138 | procedure Label5Click(Sender: TObject);
139 | procedure Label6Click(Sender: TObject);
140 | procedure MenuItem18Click(Sender: TObject);
141 | procedure MenuItem5Click(Sender: TObject);
142 | procedure MenuItem6Click(Sender: TObject);
143 | procedure MenuItem8Click(Sender: TObject);
144 | procedure ScrollBox1Click(Sender: TObject);
145 | procedure SpeedButton10Click(Sender: TObject);
146 | procedure SpeedButton11Click(Sender: TObject);
147 | procedure SpeedButton12Click(Sender: TObject);
148 | procedure SpeedButton13Click(Sender: TObject);
149 | procedure SpeedButton14Click(Sender: TObject);
150 | procedure SpeedButton15Click(Sender: TObject);
151 | procedure SpeedButton16Click(Sender: TObject);
152 | procedure SpeedButton19Click(Sender: TObject);
153 | procedure SpeedBu(Sender: TObject);
154 | procedure SpeedButton1Click(Sender: TObject);
155 | procedure SpeedButton20Click(Sender: TObject);
156 | procedure SpeedButton21Click(Sender: TObject);
157 | procedure SpeedButton22Click(Sender: TObject);
158 | procedure SpeedButton23Click(Sender: TObject);
159 | procedure SpeedButton24Click(Sender: TObject);
160 | procedure SpeedButton25Click(Sender: TObject);
161 | procedure SpeedButton26Click(Sender: TObject);
162 | procedure SpeedButton27Click(Sender: TObject);
163 | procedure SpeedButton2Click(Sender: TObject);
164 | procedure SpeedButton36Click(Sender: TObject);
165 | procedure SpeedButton37Click(Sender: TObject);
166 | procedure SpeedButton3Click(Sender: TObject);
167 | procedure SpeedButton4Click(Sender: TObject);
168 | procedure SpeedButton6Click(Sender: TObject);
169 | procedure SpeedButton7Click(Sender: TObject);
170 | procedure SpeedButton8Click(Sender: TObject);
171 | procedure SpeedButton9Click(Sender: TObject);
172 | procedure SpinEdit1Change(Sender: TObject);
173 | procedure onEditorChange(Sender: TObject);
174 | procedure onEditorKeydown(Sender: TObject);
175 | procedure BaseEditorCommandProcessed(Sender: TObject;
176 | var Command: TSynEditorCommand; var AChar: TUTF8Char; Data: pointer);
177 | procedure tmrPanelTimer(Sender: TObject);
178 | procedure tool1c1Click(Sender: TObject);
179 | procedure tool1c2Click(Sender: TObject);
180 | procedure tool1c3Click(Sender: TObject);
181 | procedure tool1cClick(Sender: TObject);
182 | procedure PanelToggle(Panel:TPanel);
183 | procedure tool2Click(Sender: TObject);
184 | procedure ToolBar1Click(Sender: TObject);
185 | procedure ToolButton10Click(Sender: TObject);
186 | procedure ToolButton12Click(Sender: TObject);
187 | procedure ToolButton1Click(Sender: TObject);
188 | procedure ToolButton2Click(Sender: TObject);
189 | procedure ToolButton7Click(Sender: TObject);
190 | procedure ToolButton8Click(Sender: TObject);
191 | private
192 | { private declarations }
193 | public
194 | { public declarations }
195 | end;
196 |
197 | type TOS = (Win, Lin, Mac);
198 |
199 | var
200 | Form1: TForm1;
201 | cPanel : TPanel;
202 | wPanel : integer;
203 | fCount : integer;
204 | pBuild : string;
205 | pTempPath : string;
206 | OS:TOS;
207 | procedure InsertEditor(StartTag : String; EndTag : String = '');
208 |
209 | implementation
210 |
211 | uses frmInsertLink, frmInsertImage, frmInsertDiv,
212 | frmInsertSpan, frmInsertParagraph, frmInsertTable,
213 | frmInsertBullet, frmInsertFlash, frmInsertForm,
214 | frmInsertTextBox, frmInsertTextarea, frmInsertPassword,
215 | frmInsertCheckBox, frmInsertRadio, frmInsertButton,
216 | frmInsertHidden, frmInsertFieldset;
217 |
218 | procedure PreviewDocument;
219 | begin
220 |
221 | if TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Hint='' then
222 | begin
223 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).lines.savetofile(pTempPath+form1.pagecontrol1.ActivePage.caption+'.html');
224 | ShellExecute(0, nil, PChar('file:///'+pTempPath+form1.pagecontrol1.ActivePage.caption+'.html'),nil,nil,SW_SHOWNORMAL);
225 | end
226 | else
227 | ShellExecute(0, nil, PChar('file:///'+TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Hint),nil,nil,SW_SHOWNORMAL);
228 | begin
229 | end;
230 |
231 | end;
232 |
233 | procedure UpdateCursorPos;
234 | begin
235 | form1.statusbar1.Panels[0].Text := 'Row: '+inttostr(TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).CaretX)+' Col: '+inttostr(TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).CaretY);
236 | end;
237 |
238 | procedure SaveDocument;
239 | begin
240 |
241 | if TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Hint='' then
242 | begin
243 | form1.SaveDialog1.FileName := form1.pagecontrol1.ActivePage.Caption;
244 | if form1.savedialog1.Execute then
245 | begin
246 | if form1.savedialog1.FileName<>'' then
247 | begin
248 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Lines.SaveToFile(form1.savedialog1.FileName);
249 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Hint := form1.savedialog1.FileName;
250 | form1.pagecontrol1.ActivePage.Caption:=extractfilename(form1.savedialog1.FileName);
251 | form1.pagecontrol1.ActivePage.ImageIndex:=7;
252 | end;
253 | end;
254 | end
255 | else
256 | begin
257 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Lines.SaveToFile(TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Hint);
258 | form1.pagecontrol1.ActivePage.ImageIndex:=7;
259 | end;
260 |
261 | end;
262 |
263 | procedure NewDocument(content:string = '');
264 | var
265 | tab : TTabSheet;
266 | editor : TSynEdit;
267 | begin
268 |
269 | tab := TTabsheet.Create(form1.PageControl1);
270 | tab.PageControl := form1.PageControl1;
271 | tab.ImageIndex:=7;
272 | tab.Caption:='Untitled-' + inttostr(fCount);
273 | inc(fCount,1);
274 |
275 | editor := TSynEdit.Create(tab);
276 | editor.Parent := tab;
277 |
278 | editor.Align := Form1.BaseEditor.Align;
279 | editor.Font := Form1.BaseEditor.Font;
280 | editor.Highlighter := Form1.BaseEditor.Highlighter;
281 | editor.Options := Form1.BaseEditor.Options;
282 | editor.Options2 := Form1.BaseEditor.Options2;
283 | editor.Gutter.Parts.Delete(0);
284 | editor.Gutter.Parts.Delete(1);
285 | editor.Gutter.Parts.Delete(2);
286 | editor.Gutter.AutoSize := true;
287 | editor.Gutter.LeftOffset:=5;
288 | editor.BookmarkOptions := Form1.BaseEditor.BookmarkOptions;
289 | editor.OnChange := Form1.BaseEditor.OnChange;
290 | editor.OnKeydown := Form1.BaseEditor.OnKeydown;
291 | editor.OnClick := Form1.BaseEditor.OnClick;
292 | editor.Lines.Text := Content;
293 | editor.DoubleBuffered := true;
294 | editor.ScrollBars := ssBoth;
295 | editor.Visible := true;
296 | form1.pagecontrol1.ActivePage := tab;
297 |
298 | end;
299 |
300 | procedure TForm1.PanelToggle(Panel:TPanel);
301 | begin
302 | cPanel := Panel;
303 | cPanel.AutoSize:=true;
304 | wPanel := cPanel.Height;
305 | cPanel.AutoSize:=false;
306 | tmrPanel.Enabled := true;
307 | end;
308 |
309 | procedure TForm1.tool2Click(Sender: TObject);
310 | begin
311 |
312 | end;
313 |
314 | procedure TForm1.ToolBar1Click(Sender: TObject);
315 | begin
316 |
317 | end;
318 |
319 | procedure TForm1.ToolButton10Click(Sender: TObject);
320 | begin
321 |
322 | end;
323 |
324 | procedure TForm1.ToolButton12Click(Sender: TObject);
325 | begin
326 | PreviewDocument;
327 | end;
328 |
329 | procedure TForm1.ToolButton1Click(Sender: TObject);
330 | begin
331 |
332 | end;
333 |
334 | procedure TForm1.ToolButton2Click(Sender: TObject);
335 | begin
336 |
337 | end;
338 |
339 | procedure TForm1.ToolButton7Click(Sender: TObject);
340 | begin
341 | NewDocument;
342 | end;
343 |
344 | procedure TForm1.ToolButton8Click(Sender: TObject);
345 | begin
346 | SaveDocument;
347 | end;
348 |
349 | procedure onEditorSave;
350 | begin
351 | form1.pagecontrol1.ActivePage.ImageIndex:=6;
352 | end;
353 |
354 | procedure TForm1.FormCreate(Sender: TObject);
355 | begin
356 | {$IFDEF WIN32} OS:=Win; {$ENDIF}
357 | {$IFDEF UNIX} OS:=Lin; {$ENDIF}
358 | {$IFDEF DARWIN} OS:=Mac; {$ENDIF}
359 | tool2.AutoSize:=true;
360 | tool3.Height:=tool1c2.Height+2;
361 | tool3.tag := 1;
362 | tool1.Height:=tool1c.Height+2;
363 | tool1.tag := 1;
364 | pTempPath := GetTempDir;
365 | fCount := 0;
366 | inc(fcount,1);
367 | NewDocument;
368 | end;
369 |
370 | procedure TForm1.FormShow(Sender: TObject);
371 | begin
372 |
373 | end;
374 |
375 | procedure TForm1.Label5Click(Sender: TObject);
376 | begin
377 | edit1.CopyToClipboard;
378 | end;
379 |
380 | procedure TForm1.Label6Click(Sender: TObject);
381 | begin
382 | InsertEditor(edit1.text);
383 | end;
384 |
385 | procedure TForm1.MenuItem18Click(Sender: TObject);
386 | begin
387 | SaveDocument;
388 | end;
389 |
390 | procedure TForm1.ColorButton1ColorChanged(Sender: TObject);
391 | var
392 | c : TColor;
393 | s, t1, t2, t3, t4: shortstring;
394 | r, g, b : integer;
395 | begin
396 |
397 | c := colorbutton1.ButtonColor;
398 | r := red(c);
399 | g := green(c);
400 | b := blue(c);
401 |
402 | s := '#' + copy(colortostring(c), 4, 6);
403 |
404 | t1 := copy(s, 2, 1);
405 | t2 := copy(s, 3, 1);
406 | t3 := copy(s, 6, 1);
407 | t4 := copy(s, 7, 1);
408 | s[2] := t3[1];
409 | s[3] := t4[1];
410 | s[6] := t1[1];
411 | s[7] := t2[1];
412 |
413 | edit1.Text := s;
414 |
415 | if colorbutton1.tag = 0 then
416 | begin
417 | spinedit1.value := r;
418 | spinedit2.value := g;
419 | spinedit3.value := b;
420 | end;
421 |
422 | end;
423 |
424 | procedure TForm1.Button1Click(Sender: TObject);
425 | begin
426 | end;
427 |
428 | procedure TForm1.BaseEditorStatusChange(Sender: TObject;
429 | Changes: TSynStatusChanges);
430 | begin
431 |
432 | end;
433 |
434 | procedure TForm1.BaseEditorProcessCommand(Sender: TObject;
435 | var Command: TSynEditorCommand; var AChar: TUTF8Char; Data: pointer);
436 | begin
437 |
438 | end;
439 |
440 | procedure TForm1.BaseEditorKeyDown(Sender: TObject; var Key: Word;
441 | Shift: TShiftState);
442 | begin
443 | UpdateCursorPos;
444 | end;
445 |
446 | procedure TForm1.BaseEditorClick(Sender: TObject);
447 | begin
448 | UpdateCursorPos;
449 | end;
450 |
451 | procedure TForm1.SpinEdit1Change(Sender: TObject);
452 | var
453 | r, g, b : integer;
454 | t : string;
455 | begin
456 | if (spinedit1.Text='') or (spinedit2.Text='') or (spinedit3.Text='') then abort;
457 | colorbutton1.Tag := 1;
458 | r := spinedit1.value;
459 | g := spinedit2.value;
460 | b := spinedit3.value;
461 | colorbutton1.ButtonColor := rgbtocolor(r,g,b);
462 | colorbutton1.Tag := 0;
463 | end;
464 |
465 | procedure TForm1.onEditorKeydown(Sender: TObject);
466 | begin
467 | UpdateCursorPos;
468 | end;
469 |
470 | procedure TForm1.onEditorChange(Sender: TObject);
471 | begin
472 |
473 | if TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Modified then
474 | begin
475 | form1.PageControl1.ActivePage.ImageIndex := 6;
476 | statusbar1.Panels[1].Text := 'Chars: '+inttostr(length(TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Text))+' Lines: '+inttostr(TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).Lines.Count);
477 | end;
478 |
479 | end;
480 |
481 | procedure TForm1.MenuItem5Click(Sender: TObject);
482 | begin
483 | TSynEdit(pagecontrol1.ActivePage.Controls[0]).SelectAll;
484 | end;
485 |
486 | procedure TForm1.MenuItem6Click(Sender: TObject);
487 | var f2:tform2;
488 | begin
489 | f2:=tform2.Create(application);
490 | f2.show;
491 | end;
492 |
493 | procedure TForm1.MenuItem8Click(Sender: TObject);
494 | begin
495 | NewDocument;
496 | end;
497 |
498 | procedure TForm1.ScrollBox1Click(Sender: TObject);
499 | begin
500 |
501 | end;
502 |
503 | procedure TForm1.SpeedButton10Click(Sender: TObject);
504 | begin
505 | InsertEditor(' ');
506 | end;
507 |
508 | procedure TForm1.SpeedButton11Click(Sender: TObject);
509 | begin
510 | InsertEditor(' ');
511 | end;
512 |
513 | procedure TForm1.SpeedButton12Click(Sender: TObject);
514 | begin
515 | InsertEditor(' ');
516 | end;
517 |
518 | procedure TForm1.SpeedButton13Click(Sender: TObject);
519 | begin
520 | InsertEditor('', ' ');
521 | end;
522 |
523 | procedure TForm1.SpeedButton14Click(Sender: TObject);
524 | var f:tfinsertimage;
525 | begin
526 | f:=tfinsertimage.Create(application);
527 | f.Show;
528 | end;
529 |
530 | procedure TForm1.SpeedButton15Click(Sender: TObject);
531 | begin
532 | InsertEditor(' ');
533 | end;
534 |
535 | procedure TForm1.SpeedButton16Click(Sender: TObject);
536 | begin
537 | InsertEditor('', ' ');
538 | end;
539 |
540 | procedure TForm1.SpeedButton19Click(Sender: TObject);
541 | var f:tfinsertlink;
542 | begin
543 | f:=tfinsertlink.Create(application);
544 | f.Show;
545 | end;
546 |
547 | procedure InsertEditor(StartTag : String; EndTag : String = '');
548 | var
549 | s:string;
550 | begin
551 |
552 | if TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).SelText='' then
553 | begin
554 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).InsertTextAtCaret(StartTag + EndTag);
555 | end
556 | else
557 | begin
558 | s := TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).SelText;
559 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).ClearSelection;
560 |
561 | if EndTag<>'' then
562 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).InsertTextAtCaret(StartTag + s + EndTag)
563 | else
564 | TSynEdit(form1.pagecontrol1.ActivePage.Controls[0]).InsertTextAtCaret(StartTag);
565 |
566 | end;
567 | end;
568 |
569 | procedure TForm1.SpeedBu(Sender: TObject);
570 | var f:tfinsertdiv;
571 | begin
572 | f:=tfinsertdiv.Create(application);
573 | f.Show;
574 | end;
575 |
576 | procedure TForm1.SpeedButton1Click(Sender: TObject);
577 | var f:tfinsertcheckbox;
578 | begin
579 | f:=tfinsertcheckbox.Create(application);
580 | f.Show;
581 | end;
582 |
583 | procedure TForm1.SpeedButton20Click(Sender: TObject);
584 | begin
585 | InsertEditor('', ' ');
586 | end;
587 |
588 | procedure TForm1.SpeedButton21Click(Sender: TObject);
589 | var f:tfinsertparagraph;
590 | begin
591 | f:=tfinsertparagraph.Create(application);
592 | f.Show;
593 | end;
594 |
595 | procedure TForm1.SpeedButton22Click(Sender: TObject);
596 | var f:tfinsertdiv;
597 | begin
598 | f:=tfinsertdiv.Create(application);
599 | f.Show;
600 | end;
601 |
602 | procedure TForm1.SpeedButton23Click(Sender: TObject);
603 | var f:tfinsertflash;
604 | begin
605 | f:=tfinsertflash.Create(application);
606 | f.Show;
607 | end;
608 |
609 | procedure TForm1.SpeedButton24Click(Sender: TObject);
610 | var f:tfinsertbullet;
611 | begin
612 | f:=tfinsertbullet.Create(application);
613 | f.Show;
614 | end;
615 |
616 | procedure TForm1.SpeedButton25Click(Sender: TObject);
617 | var f:tfinserttable;
618 | begin
619 | f:=tfinserttable.Create(application);
620 | f.Show;
621 | end;
622 |
623 | procedure TForm1.SpeedButton26Click(Sender: TObject);
624 | var f:tfinsertspan;
625 | begin
626 | f:=tfinsertspan.Create(application);
627 | f.Show;
628 | end;
629 |
630 | procedure TForm1.SpeedButton27Click(Sender: TObject);
631 | begin
632 | InsertEditor('');
633 | end;
634 | procedure TForm1.SpeedButton2Click(Sender: TObject);
635 | var f:tfinserttextbox;
636 | begin
637 | f:=tfinserttextbox.Create(application);
638 | f.Show;
639 | end;
640 |
641 | procedure TForm1.SpeedButton36Click(Sender: TObject);
642 | begin
643 | InsertEditor('');
644 | end;
645 |
646 | procedure TForm1.SpeedButton37Click(Sender: TObject);
647 | begin
648 | InsertEditor(' ');
649 | end;
650 |
651 | procedure TForm1.SpeedButton3Click(Sender: TObject);
652 | var f:tfinsertpassword;
653 | begin
654 | f:=tfinsertpassword.Create(application);
655 | f.Show;
656 | end;
657 |
658 | procedure TForm1.SpeedButton4Click(Sender: TObject);
659 | var f:tfinsertradio;
660 | begin
661 | f:=tfinsertradio.Create(application);
662 | f.Show;
663 | end;
664 |
665 | procedure TForm1.SpeedButton6Click(Sender: TObject);
666 | var f:tfinsertbutton;
667 | begin
668 | f:=tfinsertbutton.Create(application);
669 | f.Show;
670 | end;
671 |
672 | procedure TForm1.SpeedButton7Click(Sender: TObject);
673 | begin
674 | InsertEditor('', ' ');
675 | end;
676 |
677 | procedure TForm1.SpeedButton8Click(Sender: TObject);
678 | begin
679 | InsertEditor(' ');
680 | end;
681 |
682 | procedure TForm1.SpeedButton9Click(Sender: TObject);
683 | begin
684 | InsertEditor(' ');
685 | end;
686 |
687 | procedure TForm1.BaseEditorCommandProcessed(Sender: TObject;
688 | var Command: TSynEditorCommand; var AChar: TUTF8Char; Data: pointer);
689 | begin
690 |
691 | end;
692 |
693 | procedure TForm1.tmrPanelTimer(Sender: TObject);
694 | begin
695 |
696 | if cPanel.Tag =0 then
697 | begin
698 |
699 | if cPanel.Height > 22 then
700 | begin
701 | cPanel.Height := cPanel.Height - 20;
702 | end
703 | else
704 | begin
705 | cPanel.Height := 22;
706 | cPanel.Tag := 1;
707 | tmrPanel.Enabled := false;
708 | end;
709 |
710 | end
711 | else
712 | begin
713 |
714 | if cPanel.Height < wPanel then
715 | begin
716 | cPanel.Height := cPanel.Height + 10;
717 | end
718 | else
719 | begin
720 | cPanel.Height := wPanel;
721 | cPanel.Tag := 0;
722 | tmrPanel.Enabled := false;
723 | end;
724 |
725 | end;
726 |
727 | end;
728 |
729 | procedure TForm1.tool1c1Click(Sender: TObject);
730 | begin
731 | PanelToggle(tool2);
732 | end;
733 |
734 | procedure TForm1.tool1c2Click(Sender: TObject);
735 | begin
736 | PanelToggle(tool3);
737 | end;
738 |
739 | procedure TForm1.tool1c3Click(Sender: TObject);
740 | begin
741 | PanelToggle(tool4);
742 | end;
743 |
744 | procedure TForm1.tool1cClick(Sender: TObject);
745 | begin
746 | PanelToggle(tool1);
747 | end;
748 |
749 | initialization
750 | {$I unit1.lrs}
751 |
752 | end.
753 |
754 |
--------------------------------------------------------------------------------
/source/unit1.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/unit1.ppu
--------------------------------------------------------------------------------
/source/unit2.lfm:
--------------------------------------------------------------------------------
1 | object Form2: TForm2
2 | Left = 276
3 | Height = 111
4 | Top = 209
5 | Width = 332
6 | BorderIcons = [biSystemMenu]
7 | BorderStyle = bsSingle
8 | Caption = 'About W3Edit'
9 | ClientHeight = 111
10 | ClientWidth = 332
11 | Font.CharSet = TURKISH_CHARSET
12 | Font.Height = -11
13 | Font.Name = 'Tahoma'
14 | Font.Pitch = fpVariable
15 | Font.Quality = fqCleartypeNatural
16 | Position = poScreenCenter
17 | LCLVersion = '0.9.28.2'
18 | object Bevel1: TBevel
19 | Left = 10
20 | Height = 92
21 | Top = 9
22 | Width = 92
23 | end
24 | object Image1: TImage
25 | Left = 11
26 | Height = 90
27 | Top = 10
28 | Width = 90
29 | Picture.Data = {
30 | 0A544A706567496D6167653D2C0000FFD8FFE000104A46494600010101012C01
31 | 2C0000FFDB004300010101010101010101010101010101010101010101010101
32 | 0101010101010101010101010101010101010101010101010101010101010101
33 | 0101010101010101FFDB00430101010101010101010101010101010101010101
34 | 0101010101010101010101010101010101010101010101010101010101010101
35 | 01010101010101010101010101FFC0001108005A005A03011100021101031101
36 | FFC4001F0000020300020301010000000000000000070806090A020500030401
37 | 0BFFC4003B100002020103030303020305060700000002030104050611120713
38 | 210014220815312341093251162433426125343562719143525372A1D1F0FFC4
39 | 001D010002020203010000000000000000000006070405020300010809FFC400
40 | 4111000103020403040804050205050000000102031104210005123113415106
41 | 226171142332428191A1F00752B1D1083362C1F1157216243492E117275382A2
42 | FFDA000C03010002110311003F00A0FEA2E8ECD6BD1C5234931F39DD25A874CE
43 | BFA5EC168B390FF61645C9B658CA570D54EE64C2AD8F7546ADC72ABB994814E6
44 | 703DA74BF40ACC5BE125C4B6AD6342D4AD290E75538414A444CC89BCF2C5B677
45 | 58862A08D2B5EB6385613A49B9518B0022FCEF3E38E9E7EA93A8DA6B214F460E
46 | 5FA8FD3EC9D10CA5CC958D63D13D3794A9A9EEDCB1390B194AA81C9D61C6B58D
47 | 65AE78AC3586512EE47B6503A38327E69D947DBA76EA92597F4701871CA2AC5A
48 | 9254E010A1EAB42B46AF58A5C011B88C09B6B1A885020152BA82799DF6FBDE0E
49 | 009D7EEAAF54BACB949D0BAA35C8E6346E0AB60353DB455D145A014C6D866EAB
50 | B91C23D8DCC41D6C79C5D3A790776EB5AB1CD0820429DE83E8A82B69AA6AFF00
51 | D4182C3ED54BAD536AAB6EA4394CDE9E13E5484A4256B56A0947E50177C5D21A
52 | A70DB6A688512DEB57774949DD4264795F7B1C0EF44E9FC97502DE2B0DA23016
53 | EF53432C6361B4504CC85FB4230CBD65453028C5A8E6C5709B2C6F71B0C6CCBE
54 | 17C80A6D4548A63A5C8041EF4DB79EF1FBF8E2DF2BCA2B738525144D29648592
55 | 6094808E648B47C7723962C53E9FFE9AECE1AED0D47AA7015B1F8CB1A7615F6E
56 | C9385B7EB654A5D5CE6DAA77F08183701FE0D6D588C4FCB60ECCB31E3C32924F
57 | 7CAA0DC69BDCF323A781C373B35D96565EB62A6A5A6E432428240542D5EF8912
58 | 17B4F51874AA8E2F1B5BD850107942A1724A46FDC150FF0089253BEE313BC0EF
59 | B9C798DF6DBD0F9493B2A001ECF8780DEDD3C70C4A740D013A126279478F97D3
60 | 025EA369D8C860F2A16AA8761B4DBFA32B9601A6626644BF9B8C90498FC876F3
61 | E67D6B425D6DD43AD49293325378F7BBA67EFEB4999A5809735A42925252A47C
62 | 607C2F7FB8A32EB8742034CE54B52E1DBC34D5E2DEA0774DED0B20A9B0556780
63 | 0C73B5307EDE38C00EE4267051E58793665E96CA9B5CF14595FD27CBFB749C21
64 | 33FCA1342E97904A587092013DE0A24EC6208D8266FB5F9600BAA30214B0ABF8
65 | 8C0CB29DDA164239772BDC51458AA4C81DC605D29E7CBFC36C9C6C31231EAF58
66 | 49D63BC122609369E827C6F16F9E065D4C444F3B7CB031DA23C47E23C7FDBD4F
67 | 88B7EB8D18F3D731CC79EB98E634BBA16B8235ADBB7C545D945202857C790B55
68 | 68181BC4CEE2405B7F5FE5FF004F52E9A349FF00703F3DF7F2E5D76C59672A87
69 | 17A5475691A8CCDF99378C17B50E37EC9728E7A88BE6BCC83844A65A92918E44
70 | A6EF13B393C375946D26A2862BBB2B624A5C44E91A750D2BD2480B4DE7589850
71 | F84DF030A74AD37042802907C0EE74F8F4F3C528F5832D39DEA56BDD438B73EE
72 | 653319DFEFD56C3FE766A0DAED1834B7196261222B095C7E9440CCC40896C2F5
73 | 6A4A14EA1300B7A83681703483091E03C6D17C5FD022D4E820A82DD4B666D293
74 | 1BCC5A4999DC5BC31671F4F7A770DA1F4CE36969CAEBABEE50776E114831D361
75 | F112FEED9881E615CBF41232453DA5AE379DBD2C1C75FAE75D71D5FBFC34EFAA
76 | 04F77A69B74C7A2F214D1E5AC229A91086F5419494C24100920DCDCF8EC6270D
77 | 9699C5DDCA9FB8BF944B9CC0784A9366BCA44037E2D98230DC8A03720E3C87E5
78 | B94FADC8A45C8526640212BE9F9B7F95E6769C12B954804052E4EDA47C2E9007
79 | E871EAEAFEA6D37D25D3CF4E3319633DAC0E0A71ABA4871D29078CB3F50D53B9
80 | 8F723693998817715171835915BD2D0B1C2E23CB091A6EAE63C86D3D05B02F9A
81 | 7695FA271C6A8E9CADC4C0485A6C667BBB796DDE89C57EEA1EA77513317AAE33
82 | 56BF1D82CD64683AF2B4BE3AEC3B3E8A085BAE3F24DA7558C657056396C7C899
83 | 4306B2D96260801B012BD0A9C325E4D3BAE3201F585025607B5DEDADE1CAC701
84 | 5519966EF2FF00E62AA9A996E182DA560AA499D3A44E9EB7B9C087AA3D3ECF5A
85 | E9DE651F724E571B9C596471570096F6506042AE2888D4B010AF6BB6C0F82F7A
86 | A53B14F13398ADA0A9A4A6CC4AE98B89438801D6D52024A88EF69E6444723738
87 | 8B9CD0D6BB963A8782D6A1DF42F46A12932489DBC8EDBE12FD0BD06EACF5971B
88 | AC8F058BFEE386B19457BE7CC57C5FDDD38DBB9B7E0AB130A07BEF2A49858AF9
89 | F6CEED7E531F28F45CED7D2B154C30B720AB43824801293B6AE93B0D51F1C0CE
90 | 5BD99CDF37A6AAAAA46416A9F5E92B07D61420AD404D85818FAE13F312122060
91 | C8302641A05E081A1322C028FD880E244A3FAC4FABC40205CEAB9BF51C8C72F2
92 | C0AAECAD25212522081F9B657C411B7EF8E3EB2C618F3D731CC6967489FB6764
93 | B2124B26A6E529990912F857ED1446F1F18E5B3467699FCCFA98DA12120D8C1E
94 | 5F7F0C4CCCFF0098B306E44279F29F961A34C2AD635B50C02CD72882043A2094
95 | EAE63CB844CFE1A3E241BE369809F131EA5832011CC4DF03AE28051331D07DDB
96 | 1415F537A28B466BDD66F60BAC1D0BC7728B024A8D8A28BE6CBD5CB88308ECC4
97 | C0DAACFDC76392138DBE7E87AB9003CA6EDA5682A04C6A2544EAFDBC862EA8AA
98 | 94A6DB330A438142371A55BFCB7FF18607A75AF759E6B10FAD87BC74F1F18FD3
99 | AD4E4A07F0596426175D03C27F5ECDE38A7226C502A637860CC99FA09451D3B2
100 | E7AD8D6A59096B6BC989B6D169EB1861B55F5D56CEA617A1084779690751D29F
101 | E93727C849E583DF4CF4DEA60A1AE7227A835EAF27A332EDA5697A8B1F5274F6
102 | 77228B993A572B606EE31B66C33D858A456D972CD98AACC6DBC6E457DCA97573
103 | 332B1B0CB77E1A014857AA5F105F64AF9052626013BDED8B5CAC3C568714ED7B
104 | 84A389A9E3A1B03F29D95E02C7CEF865B25AA2E6B3C2695C84D7AC5694AA9DF1
105 | 3DDD06EA65CF66CCC489ACE0205C3B6D331C8FE33E03FD39C4ADE4289D00A526
106 | FC89E69DAC7FB6D8653F469A8A7A179A40E22F4A560C00B8F1EA7A93FBE3EB66
107 | 89A7AAAD52D436F44AB23A8A963D18CC7EA27A71E7771F42BC5E1189AB8EB555
108 | 166E10E4B2099C9DBAF6320CA36D947DC9532EC458AB38ADA86134A14B5D3B60
109 | A510529307793A84F888B5C49B62BD9EC9D3B352E547A2E9E3BBC45CB9C5EF8B
110 | 2552ABA0ED3A67A63A2D43D3525616D4DF0B2A5822562A90108E4525106C5F71
111 | 83DA68CCC33E3B7C666769F55ADB0A4BC95E993224A8FD641E5CB12B3BA147A3
112 | 29B1AF4E9D3736B8E5704EC2E6310EE91611788E95E734AE1D4BAF390D43AE55
113 | 92BBD9802C735D79C9AD620F9F23B289B35050DF163DB00FF9103332CD43AE55
114 | 852C052F8CCB681CD406C47873DF6E58ACECE14D3D03B4BAB42353A849980971
115 | 41402CFBA00D4428EF720038CD96704AA6A0CDD51705A5A337964F78227668A7
116 | 236550D5CCF9E2C118608FE3CF8F1E9AC8052845A3B8927C779231E7EAB4A4D4
117 | D4A8477AA1F2143650E2100FC4C91E78F944A0A3947E27F1FF00EFFEFD6CC442
118 | 2091D31FBEB98EB1A4D278E2EDDDAD133D8BD4BDCEED810E2EAC522D11ED440C
119 | 4401F2988188F86F1B6FBC48696025493CE3F537F862FB3BA621E0E894B6B94C
120 | F8916E9BEDE3F4C323A5EECDBC3D131609F2AE9E3F9F23DBF1F9FCF98DA77F1F
121 | 8FCCFA9A88D22300B5053C45249F64C4F5DBE5FF009C57A7D5DF4CE9E7BAABD3
122 | BB39B658C6E8CD6B95C568CD559D4843471A76AE7B5A179BCA455FDDE6E4CC43
123 | 0844C370228DF78A7CED4A629D554DB5C453092A223748DFE97FED8BFECEB34D
124 | 595D4F44F3BC36EA1C4B65C9D8AAC3FF00D40F19C49FA2DD1FC874EDB97E95EA
125 | 528BB3A7AF537D4BF610553EE9879DAFE0331DB7F778C312E9430489929B555A
126 | A8F21E95799BCEBF50DD4D295A5B799D412B8833055A7A41B73DC9E518746479
127 | 3AB2CAA7B2D7B492DBC08752756941F65507DE88B491798C36F98C4644F4EDDB
128 | 169EFA5A6B174D8DF6DC88C6CF6B72058A950224863A47822046099E59F189DE
129 | 3B49A91095294049244CCFE6B1FA7D70C6A8CBA9851D43CA407384CCA5246995
130 | 6C9528A62D378F66F8E7A1740DDBFD299CBB6E151F61BDFEEEE85A6AD7B05CD7
131 | 11BC8C9CACD80974EFCCB9442A276298C850ADF53874EB015A8A53636E7FD5E5
132 | D7129A729D19452B4F2D2959D4BD404440E6A9277113207863DBA3BA855F14A6
133 | 7DE32F12BDE174DA18FA6CDDAB16FB85F718BE4E5C980027B9B721939E7FBC66
134 | 8A171B54A12A41316224F818DBA7F9188EDE754C96CA0AD1DD51D0402AD5D448
135 | F9F3DB1EFCCEB60D596CB1D52B00CC4ED618BE3D82A6E2529C6A509976DB00DE
136 | 70B8DD51105107051B7AE55871B29E25EE263B849DB972F85FF4A5ABCE98CC4A
137 | 9967405252A99514EDBA8738DBC7E0315DBD76FA9757D3EE3BA95D394E9ACBE4
138 | B53EB745C6698CEAAF56AF84C135F4D786C85ABEA647BE75D5928EFA02AEE2E7
139 | 1A85A4918229BDCA32715354DD697929453A93A9A99714A8B083CA2FABF4C2E3
140 | 34ED2272DA4ADCBDB415D554A95A5C025A690ADF541172363D7E2714A53B4F8D
141 | B79DFF002511253BCFEE5F9999FDE67CEFE7D1DC729240D84EC3A1EBF1F9615D
142 | 2600E9CEF27CF97C80F9E3849447FD7FA7ACB6C758E7B4FF0049FF00B7AC7527
143 | AFEB8E6340F99BB69EBAB6449AE6C2DE4B5B4A4F8942590D47CE47623816AB97
144 | 1992200E13E787AE36BEF419BD844C7DFDF2C5A55BEE5427D638B5A53DE2922D
145 | 37F9DA7074E8A6AA5E630CDC5B0E0AF6394BB2B4C4C737639FCE208378DCE6AB
146 | C588608ED21C57BF8282F562D2F4F7483757FE302B5480091A6D3BDFF5FBFAE3
147 | A8FA8ED1E9D7BD32D45A7C489361950AF50794941AAF5219B15FFD4372471831
148 | 983832DC623C4FAD8FA438D38DAB65A4A0DA7DA118D0C2CD3B88741BA149583C
149 | C149911F1C06FA4DD41CD6BEE99E9FEAEBEF5FCDE5340D6C7F4E7A99518C5D8B
150 | 75CB13214A866802061B1022759D64DBB7B8AB6BDCF3E75DD24A0ABA2553D4BB
151 | 48B1A1C42D4A6503DF64AB94F2493B5CDCCE3D079566EE565053672AF59E8E1B
152 | 66AA00D4BDBBCB02F31304FE8307DD55D6BAD1A6598D1A87B5BAA13520EB18FB
153 | 8870981B04E0770116FE81F737E3F289DB944FAD54A85BAB52B5690C26F6267C
154 | 3E877F09C1B5676AE878029D0970F1DA1222C50606827F51CB7C7C9D1FC4E633
155 | A0EC1FB8D579F5DA28B7FD90D3C0794A099099329B6DFD1AD40E7E3DCA9393AF
156 | 045FCCA922F96FF4AA36DE4CA836E3842A41277DBB80C7FF0051BE2902D4CD2E
157 | ACC336452512C95A6952A150E290A3011A132EDAFA92081327C7130EACE8ACAF
158 | 4F714ECBE631385C345E2C6C60F1E0D66A9C85E7E52AFB8AC9737152AC1E336A
159 | F236180766E7B710B5DCE0C4C03704BA5FA92DB61E48D3AD4F170251A07F40EF
160 | 6DF198DB118D7D0D7E8A1C8A89FAFA9F651AF532D220C29C57301BBAE0C48C76
161 | 9D31D3A9A5A46A65F383119CC812D96990429553F7D91AF0BAEA010089AF5D5C
162 | 4222060DB33DC6ED3F1F515E5A1E9D04B884592A2954B9A4813E17E66DB78637
163 | D4B34F40E202786342743AE2121295BEE085C01780640B993BE155D57F4DDA1F
164 | EA7FAE7A3B4FEB59CD57D3FA9354E5B4FA32982C9D7C3E4AA5CBDB2716F45AB3
165 | 4F21578D8C825750D2EA8C5B556BB91312ADFD5EE5D9AFA154B0C2D0101F5B41
166 | C4CC046B4802E9EA4C0D5BABC70B1CE72E5D5B15B985310A5528716352484ADA
167 | 6E6577F6E00DC585CE257D57FE0578DC4279F4DFAB7A9F0F798BEED6A3D4ED37
168 | 432B89730C3755766A0D2854EC57864C8C459662AC76D7FA869DA246187A1831
169 | FCF46A1ED1507122662411AE363631800455AFB814D832994E930637E7B9F2B6
170 | 2A23EA07E85FEA63E9CF9DDEA2F4CB265A7064C57AD748C16ABD22C112919376
171 | 5716B366324A3628565EA63CB8F9F3C676D6A61D090B6CA1E07927B8A4906F29
172 | 549223A0E631310E2546C60A615A55650E7067978F3F3C27FB71F8CB99123E26
173 | 360F131E263F3FB7A82586C924F1679FAA737C7648249D5B99F77F6C68033733
174 | 59F5C8E365B6D2A38C47CA0991C1D011E7B72441DC3E25C4848A3C179F521202
175 | 4CE2C96BD6D05CAA09D3A57A42E7CBDA022675244F29C2A14FEA5737D35EB05B
176 | C0A349DBC8B7059FF6496E2EDA04F2B87BD59161D5DB4EDCD6086BEB91B17DAB
177 | 6712410F20E233C78BAD698235EA4AA0910356DCC81B0F1D8F2B838A57E986A2
178 | 75EAD64E9493001FBFBDF056EA67D7C74E32BA68E343E0F5565334FB0B96D2CA
179 | D25606AD552CB94A6DDF37598E6D1F89FB445AFD3EE302423CC64BCD699094FB
180 | 4E154C74902609E56F84D8F4C41F4652548E229280B98B933BEDD7C7F78C5556
181 | 57A81AFF001D9BD539BD3F98CB68EAFAC6C133358BD2B98C8E3B0B6D22CEE271
182 | B7A9AECC7DCEA56E2B888B80C276C447F1771F5592C5712E38D36577085293DE
183 | 6E6C44F231CEFE58BDA6A97E99A5354D54FA104A4B8428F0A53EEE81BCFCAFE1
184 | 8BB4E9366F2F8BC4696A3D66D25674A6AABBA67177727A7F374496E2C767AAAE
185 | CE3F394D4F001953618A65CAB02C85C31E83FD6AEDE21F5B4CED12D7C30AD0B7
186 | 25B591A350F8EF1D0E18391E60D55069C5A82DC693045A267F298F8E9DFE182C
187 | 682D3999D1B9EB47A5F21F6AC7B25C74AA26B439955166065CB42ACCD8C796F0
188 | 02C530D24705B39652C8867A86F2DBAF4A52F32D288225494F0B591F9CA12994
189 | C6F6DB07B4194E42A5BB595796D7BEE3FA55C365E70D3EA0757742569299D882
190 | 7494F2C1A72350F3695DFBC9B991B94F787DFB53633D6C38F9F9358538DC72F8
191 | F195A6BCC87E3F44082394B2C70E94848653B684D3A6E001B28AAE413ED6E4F4
192 | C5AA7317D92B62968DACA298D927D5A6A0B7174928038863F3CEF33388B65F37
193 | 6EDAE8E13120EEED8B0AAC9A851FAEEB325073624A36215AE15EE1E6CDFB6983
194 | 29F970DE052B0B6DA72A9F0131AE5310DDA4E913CEC08B4F31B4E02B3AA915B5
195 | D4F9765DC45AB536164244856A126D3693249BF5E58EEBFB2B7B02CD1B6317CD
196 | 592D3BA9F4C65B1B67791EFDDAB9BA2D9226F8E046646473331F0FF92368A2E2
197 | A96F38B4D89719D2AE7FCE6F4C74222DB47CB17B59963347953D4DA44354B52D
198 | 91BF165A595926F267DA9DF95B1A76EABE8AA9630C540910A7D8C7A613C53064
199 | D77DCAD836102B229858A84E25913B0ED1FB89443CD83AA9A9CFBDC24EAEB3F1
200 | C799C7F389D8071CE7EC89803C2DD30A5BB4C2871AEA775617B1B5D2750A9B55
201 | DC5056F941A2C0109D73EECCC84AA61A4C3938203FCFAEBBE4CEC7607A0FD7E7
202 | CBA637B89EF95A57074C4723E7D45E70BEBBA07D036B9AD774C341F798D631BC
203 | F4F53E5DC32923E5F8F97299DFC479FDA3D65EB3F323FEC18C3D6FE647FDA314
204 | 03AA0E4716A3389E4B7A99CCFE33322D186102E47CECB633CFCE76899D8A2378
205 | D58235E90DA7B89DE12A1CEDD26D03C049EBCABFBA8DA76FE63EA6711F6337D6
206 | BD7B4896661D552160FBB8FC6E53116090B60B9216DB5482AA2CB52D5D77382D
207 | 944A9713303329453A8A4A21402547C26DAAD3A77FADB101435EF31B5BA7F913
208 | FAE235AC7A536F0AED558A5557863F496866EAE18AD6FBEB564DCD81A9708FDB
209 | 20B38EABBBA96466C49BA2995AB8A045742AB80F53D4A5D750C15A15AFD5AB48
210 | 82133AAD799E7B4D8DF1A421216B1A4A84089E46419B9B797D3122FA07E8F23E
211 | A3BEB23E9FBA636F13EF702DD758BD57AEEB6E6DAA9D1DA35A3A9F3E0F2F1329
212 | B89C72B1330CE504DCA250327CC226F19A75376528AB53800D20130551D2C426
213 | 648BFEA30755C142D52403B69DF57D06D3FA78E365FF00531F497D3DFA86D195
214 | 119CA23A7F55E3F1D83FEC8EBBC452516634AC649795B4FA9DBE6B0BFA7ECD99
215 | 18BB8679406E06CAACAD6766FAB97A9D879A0CBA90B4249D0AF7931E60DBE3E3
216 | 881455D5148EF19A54756CCE933CFCE3EB8A51D7DA0FABFF004BDAB0FA7FD6DC
217 | 259B209790E92D79A769E42E697D73895099AAC632CC24DD4EF2D43017B0D908
218 | 55AAF6B823638ED31C175FD9C530F875A2A2DB8551064691E093BFCF0D8C83B7
219 | 8A43694BA48094C1922DB7F50FB077C77988EA86B2D5F8420D03A73ED7860E70
220 | DCF6A2B418EA76D2A925B6118E58BB2769B3CA600E2AA95271B732F8CFA84E54
221 | 53509E0A8ACB89DDA09BEA8F789DAFBE08D1559A6721C7299B6831A42D6FBA4A
222 | 8E92621B836917E9F5C4AB4956A3A78D994CDDA8CC6A4CAAFB6FC9B55DBAF5D2
223 | 5C7951C653F98D2ADB8FEBB098CB564C609EE2811058DE63595156E0E2694322
224 | 74B482609B4294444AA27E6704391E5B4F40B538AF5952BFE63CAEA40B213EE8
225 | 92399DB9ED8617A75815F52B5C685D154C21B6B546AED3B8C54016E700CCAD56
226 | 5C6F0F97C1141566C30BC6CA51494440CED029D82F5530D244EB75A840E612A9
227 | 23ADA011E38DDDA2AB4D265198549D9AA57419BC952148117B924F38B4DCE348
228 | 9D4A77DB9973283B8A703A7040788ECC5DAC943AE555F38FC4A5571632BF9473
229 | 64C48CCEC5E9F0841434D093DC6C588B8B4C63CB217C454180A714481CA3FC61
230 | 26CD38939CCA5480204A948B16604A3E3658951CD7E3131BBA58E5F18DB97223
231 | 99F31B7AECCEE7A624B7251AB949F80DB1C21191DA3FE1A1E3F908CF90FF00CA
232 | 5B5598DE3F13B4CC6FF899F58E32EEFE64FD7F6C7F38F2C966ECB175BEE199B3
233 | CD909AF5FEE37AD438FB500035025AD37B9AC288E2B0DC88A0606778DAA8BDDD
234 | 5952D23489BAB488E73CA07DED8B8489212DA16A528FB281AD4A3FDE2637C19F
235 | 48E87D7427A36CA709ABE95A7EBDC555B1955E3F2CAB986C5D82C6576B6E5B21
236 | 4F6E931EE3357374543045A1BDE005535CF55D1A90E4D652B8B28EE212E05156
237 | 90661103AFD7AC1C495D15621975C550D506DB1DF5F04F767A8F9E1EFEB5C0E2
238 | 349F53E8E5ADAAB5A668FCBBAA24100D2B68B38C682C26C10B65050E268B16B2
239 | 51894ADE25F89F5494258FF536595293C6284B88F6A74441F026361E588210A2
240 | 90B4894AB9D86E2533F76C59CFF038FA6AC068CC68FD45BD876333D46D3786D3
241 | 98527AA5BF6EA586C7372FAC7B37277190C8E61B8D582940B6D7FB7D8AAD7BF6
242 | 46C6340B2EA9E7370D3A5B45AE950DE79EC3FCC9C55660F14FA911DE4F7AD707
243 | 9C1FBDFC71A40CF61A634FB2103C17F6DB3577E24300CC45F79A2778DE77E04E
244 | 88DE67E33B7E2663D59253ACC6DBF97CB1588202BCC581E781A75565237308C7
245 | A97D9760156B674410F743238878908CFC1451CBB92703063B7898F96FDB8042
246 | 06DA07404248D88FD3C8632092A0ECF70A7623A1F96C71487F5A7D3DCE745BA8
247 | 190EA4686A5B74E7A8C7F7CD458CAD50BD8692D4990B0F55EB0B557985D6C766
248 | 6EA19620B80AAAE4DA55F65FBAAB0C13ED2E5CD11E9E84CB8EC25DD037513759
249 | 03AF4F961A3D87ED054361596295A92A084A759922C76F38B6D691852F4C7501
250 | 19E2760E67DF5F36A0F1AB4C36C5AB5DF2F0BA895FEBB190CDD5DA50B0C8F844
251 | 0CC98FA5DD42205A091B25461C549E49373BEF3D30D8A5A828492E10DE8EF294
252 | E0294809DFBE5316066C4ED6B8C5FBFF000F5FA60CDE92CA2BAC7D55C7330D9F
253 | 0C6395A534D5D1EDE4F4EE27228ECE4B50E7133F2C6E6F334CCB1183C5BA62ED
254 | 0A36EF64EF0546CA52B32ECBE42FB6EFFA956361037A36DC8048FF00E423717D
255 | A2E799C2AFB7BDAE66B52728CB5DE2D3267D36A53AB84B720A52DB4A98710999
256 | 2A160A0411AAF8B38D706ACD635A82DCA7506ACC6D72FCEC55AB426CBF8CCC6F
257 | 0BECD2948EF1B0AB6F8C4F8960CC851D8584F8A8C01138552484BA851BA50930
258 | 3AB9B245BAFDED840751661D8ED5392B574E253946373751853022EACDC93E92
259 | 20368F3359BBEF01CB87645733E3D71D1B2BAC081CB1352E71068480984EA294
260 | D86D3F3917F9E0D74FA699FBB52ADCFED03EAFBBAE9B5EDA111B57EFAC5BD88D
261 | CE276572EDFE23F97D75C33E3F2C47E3B7CCDF1884FA18E80E2ED63B0FD797E4
262 | 6966F52D3BF9FA986D1F0BAF76AD35D593A36F27698DDCD59E19327631420B52
263 | 170A8D9ADB00D5297B559B3A16ACB584114DEAD4A59494BC52B9252481749D3C
264 | F0E6EC7650CAD2D660EADB76A941D0D37B34929375049B95C191E18B33D58BC0
265 | 694C6D8D7992C7B6DE97B49A6BBA746895946332175834DCECC857535B155F1C
266 | 26AA3B5F0B4C287CC94A47D0B53E999252813DD71642528163ED12003BD8F238
267 | 653F4FC2650E291C44B8D292B4368D7ACAA7DA40998E4237C22FF51D8DE91F50
268 | F44EADC9F4DF5942AEAB1A188B98CCDD1CBD0ABC4E56D558C4E40A84A9CF0AB2
269 | C59629CC8B16216C722006959ED10E5D594ED56335AF176A0B28D2DA19696E17
270 | 00954F1100A128D37066E36BE14FDA1CAA878AD0CB54B429C28E2B4E34E21295
271 | AE01514C0B83F01F1C5B5FF0FEFA9FE9CF4EBA63D05E846434CE7F10BD1916B4
272 | BDBD6AA3A792C0E6339AAED0BE18615FB77F143CAFAEACAAC05D2E2C4B3B8230
273 | 4025190769F2CAA65B652A738CB79654626CE28946BD3B280EEC9DF637C0BE6D
274 | D8CCC184D45771E9DC432D2545B4EB0B311A8051EEF77751C681B0D62333A4F2
275 | 2110276F116AFD5B9B4C94110A61DDCDB79DBB8BB016078C719864944C8F9F47
276 | 4DDA7FA85BC475FAE011C477844C11E063C279F49C2F9D75316E370171673205
277 | A52C30262246206B62D3647CC7E77B294FF48D8662636DFD74B364A7A4DFCB7F
278 | 95A71B9BDD5E1FB1FB8C01B585256A6BD8DA4FAE1651DE4ABB7DCAC2D2A99FC5
279 | C5DAE909BABB18F7036E56B15E69E410CC7DC861D4B423CC1CBD252971252A01
280 | 4950B8DC1C4A696A695AD254DA85F52652AF0BFED7DBA6275D23E96749744651
281 | F95C1699D35A6F53839A9BD6F05D2EC160F5357696CDE1F72A4992AD2FF050EA
282 | 1686B384A1A1B890CFAD2D5053257AD14D4E9304CF0D0A5EFC94B074FCB718DD
283 | 559A57D42421DACAB750001A1752EABC811A848F33F0C3634B57C3955B0387AC
284 | 752B58307E40DAEEFDEB9CCD805376C8CC4436D4AE60131BC761852331FE69E1
285 | 29B0D333607A11F41BED1FA62B4CC5EDD07DDEDE37C4FADE4CAC637197923C86
286 | 96A1C8BD92BE3B18AAD5BA45231B44EE3C6771F1F0FF00A4EDB128484E9B2BBD
287 | ABC414F2B631C265ADB1839CD37D26B70B2327EA68C3B5B111B0D4B9A986D887
288 | F97746C868904CCED2C28DBE7E7A590AA47B690E21495751EC917E667E23E929
289 | B56852E4721F71E3FD8E1BE1708088C71D8460636AAEDB688DA36D99B7AB1432
290 | CE844AAFA53EF0E9886549937C633BE967A713D2ED0B5F41D9C6E3F03D47A17A
291 | DE5B2B91AB62DDCC4EB47DBB3129ECDC058AAC540C6851A2CF689EEE32D57E7D
292 | B6A8CFB880CEAA457D43CF1735F1540321653EAD00196FB9CF9C9F863D17D9BA
293 | 1732F6A898699436F214A5EA1AD414955A10A50893693C86D1867339D4BF6DD3
294 | 8EAAE274BFDBF0BD4BCA692D498E1D11A9298DDC7656D3313708F398E05CF154
295 | 50AA913A79CA8CE2C644459209920086AA6A47280523A43D4B52F35E98CAC58E
296 | 82088D1DFEE83B129DE4E182E294D203CDBA1AAA68809EF47AD92A6A652A9EFD
297 | AC22D8CE1DCCDF523255ACDC726C59EDC08DFB5653B96DDB892B4D61B06B4379
298 | 773660EED22616DC788CC96D251767E9436CB3E8E19D434A4256B2D220C2483A
299 | B64D84EC6F85F67AC66B5754F55573CEB15E93EC2DE553FA44DD4EB61284A149
300 | 57BD007875C6953F861F41F5B6ABA1D3ACDEBACD602E69473731AFB138CF7319
301 | 0BF635960EE5DC763B0362CD436A69D148634B332C9B365F0F4D54CF112602BB
302 | ECEE474D55568CE29086A94A9D6FD1787C21A9A5A933A0849F674906C255D701
303 | DDAAED2D63197BFD987599532E35AAA8BABE3292F3487BBA55BA614537EF19E9
304 | 8D07745B55133239EC05FD8AF53E09BA2523DCB055DEFA24CB0AF8483CEB4D50
305 | 717125B2056696703805B0D3DC369E97BF9C6154A93DE4FB22E3C3EFFC6051D7
306 | 4C8BEBF4C31794AEB169AB1F571310D867080B7694A6EE4BF23CABD7F6DDC19D
307 | A64E623F131E85BB71DA077B2FD98AFCF18659AA5E5EB68861FE225B7BD21E4A
308 | 149538DFB094824151FF0070C5964D488AECC1AA75A969E26B57AB014BEEA46C
309 | 93D266264ED85728F506965ADD749B230565DA6B1A54DB67F5EB8663019407D3
310 | 71340792D4052BEEF7803644B0A67C4F259F657F1F3B1F9D214DE6C87FB34FB0
311 | E269DC5561151972DDF780AD644532B56C8A945D26E64CE08731EC8E614C3551
312 | AD398A17A9412DF75E4241B92951483C3829500A9B4C4461CDD2BAD34D6BCD3F
313 | 5B515155545D663A5191F6723DFAF95A332A663986AF102B709AD525C67B5204
314 | BFD32F0F3A7A9454B687295C69F69C6C2DB758525D6DC6D63505A1C49295248F
315 | 7A6301AF214CBAA4380A569511A540A55DDB1EE9BC0362769C4C3020CC763ACD
316 | F280764EBA5B95B890919632D8AA595AA2B7DC602A80A92023B0EEB9FDCE7790
317 | D2B52BAF973EA276B7EF18C54ADBAC4F9831D3E38E7A3F5705CD05928971CD8A
318 | 09BD6C98CDC0E4CACB5EDE5B6D10724C39F3FCBB6D3EB341BAC4FBC6D2264DC4
319 | 09B483F3C604E92352480ADA01EB16F2F8E2218DE0DD15D338772E2AD53A6ACC
320 | C917C45962FB088A226226379746FF00E59DE277DB7DB06FFE997A44E95827E0
321 | BFEDF7B636EBF5CA4CF216F0822DF3186B3DA6FE609BB4F98D84F6DBF6DBD5D2
322 | 4F753646C3A74F3C68E1FF00BBEFE18C69FD40755F547424B1DA71FA4713AF70
323 | F7956319A6B2439E5E9EBFA6F2E0B3652B17AE921A2226C3E277AB98B2C33856
324 | 35BC9A0A9523DD9761B53AB4BB087DCEF0D1A8A7A69E9B136E9874653F886EA2
325 | 8D14951401D75845AA1A7385A8EA90A505A547E00EDE267027E9C7D613BAB5D3
326 | EBEC3E9FFDAF2DA6F0B93D399AC88E46B5816DAC8628C10E420FDBB2308F6AD8
327 | C97919126F822BB57C9B5CEDD2D7E4FE86E310EA5CDC9D08D27860FBE9BCAF9C
328 | DA6636182BA3ED9B59BB2CD29A6522B90EB4757714956A581A1011ED106EA3BC
329 | 7CCD59D0C5E032BA67A917F3B959C767B13A6E86434951F778FAF5F319076B4D
330 | 3F8CC963995AE903F207574F64F2993AB4F0C0CC80BA8959B0A8C653BCC595F6
331 | 7D8654DE60AD600A66788DE953614E2C94885249041824F7526FB9E7823FC48A
332 | 5AB73FD25C5214B7832EB350B6C5996E37D42133EF5FBD322DB634B1FC1DF58E
333 | 4751FD33EA32C725ACBDD18D5F87C88F0199E78ED4945B90B1538EDFCC363119
334 | 8291192D82F0336E71BCCCC9DC429DAFA7428C31545C337528B9A8E827A0D8F5
335 | 8F8E133DBBA0712FE4D983AA485669968909BEA5D12BD1B5954F7B5B68428AA0
336 | 4A94768C5E4A6DE3ABEA7C06BFC548EDA81218DCA768865379771036B1D70046
337 | 23F5BBF4E2BB771DF9B63E23311EAF49C2DFD90A4A8DCA8E9FF6EC26F6E7816F
338 | 50730AC974AAF63A59067F78B18B05CFCB735E66D6F1C79721E09A93F8DB682D
339 | E2636F496FE207331957E1B6662DC5AACC682852898D643DC577CD21A4924C11
340 | 3169B82BEC6D18773F6546C1869464110A2EC04C4C8246FF00AF4C5476675966
341 | F4AEADB15C2D95AAF432D91AFECEC930D70A63A79C2CF7E68988D86362E1FB48
342 | EDE9A14DFC3E7E1FFE24FE16763AA9EA1FF867B4198F66F2772A3B459334D22A
343 | AA6A3D0DA4A975B4AEFA8CC52AD2645425B25360AB894F2FF14FB4FD94ED9768
344 | A99158ACD72DA6CCEB50DD0E60F3AA425A4D4292380F27BC846927409294ED18
345 | 36F473AC4BC7EA4CF457CDBF4D8D85D6B762A3766D73B41CB9357B258B64C89C
346 | C4C3170CE7E76F48DED67E0E7F111F869E8994FE1F3B9B76AE80296B454766E9
347 | DB5B45A528A596AAB2BAD2AF45790900B8A6B534924F0E13BB5322FC4DFC38ED
348 | 1B4BA9ED21A0C89D328F45CD1D75456ADF88C5536C1D40F7A10A12445ED73FE4
349 | FAFC87C18B753E5EDFE9EDFDD06DA93C223693E2A1AA3C627FA44F298FE5FEA3
350 | 4AFC10FE33FB56DA6B1FA6CF2813A8452D4F6AF29C89FD49BFFD0D355A16981F
351 | 9C09E9A81C597FEACFE07650A4D28ADA57FBC841729324ACCC11A9721292E2D8
352 | B011B8EEF4DB126E96F506EA53AE28DBBAEB74727A46F5EC7FB829DA1E623DB2
353 | DCA39F2643C3972E45F18DA77F57FF00815DA7ED6B9DA0ED2F657B6198D456D6
354 | 6474CEB619AB79BAB5D254D2562E92B5915001E2AD2E8890B5A74F7810713BB6
355 | 141968A3CA73ACA996914B5FC37D971A4680EB2FB7A9054C2A785DD3ECAD208D
356 | C48BE19DCF5CFB2F4F70851321388B5A4EE47C662062ADFA1DCF94C178981999
357 | FE91FBFE7D7A65128A77A3DAE12D462F783E1CB7C2F48978AFC140F59EB1D30D
358 | 727555484AA256B99852E267B2B9DE606379DF8F9DFF00AFEFEB6B6B496D0487
359 | 24A124D87418D7ABC15F2C6263EB5889BAA680B48990AC27526D2A193270BB34
360 | B4AE46C53B0105BF07D4B0B5BEB3476621CB06A884C44A07B31243747048D4FA
361 | B5418980A89EBF1C13E5401E2C807BF17136836F2C241F49F3335F335A667DBB
362 | 15A8A0D1FF00827115716D88357F2144340591B8CECC113FE6889F43199DD6A9
363 | BFFCBB9BE0B722EED7D2A93DD50A84C293622E9D88B8C00F5DD4AAAD75AB29AA
364 | B575D4AF9EB8B4555A561592B8B07B2D4811852C23FF00280C0FFA7A8B476612
365 | 458CAAE37F67AFC0619D9CBEFBC8683CF3AE8E328438E2D62EABFB44EF8D5C7F
366 | 038C7D0AFF004F3D432AF4AA20ADF531A8B449AC954D9457D11A76509B120112
367 | E5226CD994AD9C817361F2111DD67227C85223305C0D6A7D1A971DE55B9AB73F
368 | 1C293B78E2D4FE4A82B5943596AB8482A252DEA7D5AB4266113CF4C4F3C59269
369 | B228D1B546266051AB2C2903133C52A5EA60105AA3F0B001991000D846276888
370 | 8F440A1EA55E63F5380658122C3657E9805F502C584E97D56697B9449D6DAD25
371 | 44B69812A46DDC9195C8CC4848C9948C8EDB4916DF99F5E7DFC7765AAA6BB0F4
372 | D52D37514EE768DF0E53BE84BCCAC0A451016D38148541B8D4930706DD8A31E9
373 | AB1EDA29D1A15EF26EBF64EE3E18A86EB4647209CD69F255FB8A2B99289B92BB
374 | 4F09B52566A414D9913897C944CC4F7796F133BFE7D7A47B2F5F5C8C832B6915
375 | 956969B6291B6DB4D43C96DB424A02508405E94A122C94A4000580C2DB38CB32
376 | D72AABDC732FA171C50AE529C5D230A5957154751529B2A2A9BC93389FF4F488
377 | EFD93329332AD5B9114C914F928F333E67C44479FDA223F6F5E9DECDB8B524AD
378 | 4B5A96428151512AD9AF7899C7993B46DB69AD284B684A12D929425290904055
379 | C240807CB066FF00233FF60FFF003B6FE8C924875B0090245A7024DDD2D13732
380 | C99373FCC779E180D2053EDABCEF3BCE1298CCEFE6624B1BBC4FFA4EF3BC7EFE
381 | BE3CF602DFC417E2BA45826B3B55A40D93A7B44B0981CA05846C36C7D13CC4FF
382 | 00EDDF623C72DA207C629ADF2E5D30F7755A663A697E626627D952F313E7FC44
383 | FEFEBD5883EAD3E2983E373BF5C2F556518B7F8C19E8917B2A7F22FF0075AFFB
384 | CFFE907ACA48B038C71FFFD9
385 | }
386 | end
387 | object Label2: TLabel
388 | Left = 113
389 | Height = 14
390 | Top = 7
391 | Width = 142
392 | Caption = 'Developed by Murat Cileli'
393 | Font.CharSet = TURKISH_CHARSET
394 | Font.Color = 4539717
395 | Font.Height = -11
396 | Font.Name = 'Tahoma'
397 | Font.Pitch = fpVariable
398 | Font.Quality = fqCleartypeNatural
399 | Font.Style = [fsBold]
400 | ParentColor = False
401 | ParentFont = False
402 | end
403 | object Label3: TLabel
404 | Left = 113
405 | Height = 43
406 | Top = 22
407 | Width = 211
408 | AutoSize = False
409 | Caption = 'For feature request, bug report, suggestion or anything else really then send an email to'
410 | Font.CharSet = TURKISH_CHARSET
411 | Font.Color = 2763306
412 | Font.Height = -11
413 | Font.Name = 'Tahoma'
414 | Font.Pitch = fpVariable
415 | Font.Quality = fqCleartypeNatural
416 | ParentColor = False
417 | ParentFont = False
418 | ShowAccelChar = False
419 | WordWrap = True
420 | end
421 | object Label4: TLabel
422 | Left = 200
423 | Height = 14
424 | Top = 48
425 | Width = 118
426 | Caption = 'murat.cileli@gmail.com'
427 | Font.CharSet = TURKISH_CHARSET
428 | Font.Color = 8149072
429 | Font.Height = -11
430 | Font.Name = 'Tahoma'
431 | Font.Pitch = fpVariable
432 | Font.Quality = fqCleartypeNatural
433 | Font.Style = [fsUnderline]
434 | ParentColor = False
435 | ParentFont = False
436 | end
437 | object Label5: TLabel
438 | Left = 113
439 | Height = 14
440 | Top = 72
441 | Width = 48
442 | Caption = 'Caution!'
443 | Font.CharSet = TURKISH_CHARSET
444 | Font.Color = 5592405
445 | Font.Height = -11
446 | Font.Name = 'Tahoma'
447 | Font.Pitch = fpVariable
448 | Font.Quality = fqCleartypeNatural
449 | Font.Style = [fsBold]
450 | ParentColor = False
451 | ParentFont = False
452 | end
453 | object Label6: TLabel
454 | Left = 113
455 | Height = 13
456 | Top = 87
457 | Width = 211
458 | AutoSize = False
459 | Caption = 'Do not use W3Edit on live animals.'
460 | Font.CharSet = TURKISH_CHARSET
461 | Font.Color = 5592405
462 | Font.Height = -11
463 | Font.Name = 'Tahoma'
464 | Font.Pitch = fpVariable
465 | Font.Quality = fqCleartypeNatural
466 | ParentColor = False
467 | ParentFont = False
468 | WordWrap = True
469 | end
470 | object Image2: TImage
471 | Left = 302
472 | Height = 16
473 | Top = 7
474 | Width = 16
475 | AutoSize = True
476 | Picture.Data = {
477 | 1754506F727461626C654E6574776F726B47726170686963B202000089504E47
478 | 0D0A1A0A0000000D49484452000000100000001008060000001FF3FF61000000
479 | 2A744558744372656174696F6E2054696D650046722032204170722032303034
480 | 2031313A31343A3333202B30313030FE7675A70000000774494D4507D4070708
481 | 1D1B1196E478000000097048597300000AF000000AF00142AC34980000000467
482 | 414D410000B18F0BFC61050000020B4944415478DA9D534D6B1441107DDDD36B
483 | 76D9A898C37A5A0541C45C1445D46B4E1E02FA13FC0B7AF096AB7F41F4E63117
484 | 1121E24DF4220AB908825F1009248291AC61B33B3BD31FE5EBEE31E351D35074
485 | 4F4F55BD57AFAA15F25238DC12652F1753E9F74D885FC9342404EE0A21EEFC21
486 | 41203C880FBC139465BD3FFC2417E8FEC3B8FEBCE92E9EEF40174051347C4828
487 | 78C039C0DAC62AA0AA817A86CD6F3F0D2F6ED1F3A9F64165ECBA841C5D800CCF
488 | 9297CE55254A92F7949807AD50BB54F190D6358EB4E06AC89D07088B5781178F
489 | 81C169E8F7AFA1BCCD6CA2898E1527F32207BA196749EBC6ED14ACEF2E112424
490 | 443173C0FC09C8CE163D6340C8216461E54078A54345944B4BC09BE750937142
491 | 8802FAEBCB98ACACC29DBB0278DF96C2DDBBB669C6C68B5949CD1C8A2896A949
492 | 9D019B9FE17EEDC2CC66048FC164401FB601552CBB59DAA303F5EA09AA6BCB59
493 | F5E9948256D01B1F707CE5268E7C594F41703E33E1D9FA76108C6302FD7215C5
494 | 998BD8BDBF86EEDA23C8780FBD8FEF1864A1227AB039794A62E183B409BC8BE2
495 | 18F41EDEC3DCC249F8630374B6BF668D826FD06D6BC1712CFE4AE0527DCC5E18
496 | E8F1087A7FD4F69DCE8976448F3EE2930E363348929AEFA3AADC7BBB6D6D488D
497 | A25E4D9F23733AC66F6192A49B6431B726326B12A45EC6898A63792A8AFA0F0F
498 | AB190A6CD09E45674E0C06B4DEFFBC425A49DBF98376E8E7FC1BFB242ECBE4DC
499 | EAFE0000000049454E44AE426082
500 | }
501 | Transparent = True
502 | end
503 | end
504 |
--------------------------------------------------------------------------------
/source/unit2.o:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/unit2.o
--------------------------------------------------------------------------------
/source/unit2.pas:
--------------------------------------------------------------------------------
1 | unit Unit2;
2 |
3 | {$mode objfpc}{$H+}
4 |
5 | interface
6 |
7 | uses
8 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
9 | ExtCtrls, StdCtrls;
10 |
11 | type
12 |
13 | { TForm2 }
14 |
15 | TForm2 = class(TForm)
16 | Bevel1: TBevel;
17 | Image1: TImage;
18 | Image2: TImage;
19 | Label2: TLabel;
20 | Label3: TLabel;
21 | Label4: TLabel;
22 | Label5: TLabel;
23 | Label6: TLabel;
24 | private
25 | { private declarations }
26 | public
27 | { public declarations }
28 | end;
29 |
30 | var
31 | Form2: TForm2;
32 |
33 | implementation
34 |
35 | initialization
36 | {$I unit2.lrs}
37 |
38 | end.
39 |
40 |
--------------------------------------------------------------------------------
/source/unit2.ppu:
--------------------------------------------------------------------------------
https://raw.githubusercontent.com/ozok/W3Edit-HTML-Editor/f2b58c69ea9b147f177df0d30f9141fabd338ec4/source/unit2.ppu
--------------------------------------------------------------------------------