images: Add tool by Roland Hahn ("IconTable") to create an html page from the general-purpose images.

This commit is contained in:
wp_xyz 2022-04-30 23:59:13 +02:00
parent 1bb5dadc94
commit 4af239470b
6 changed files with 1594 additions and 0 deletions

View File

@ -0,0 +1,667 @@
<!DOCTYPE html>
<html lang="de">
<head>
<title>Icons</title>
<meta charset="UTF-8">
<style media="all">
body {font-family: sans-serif; font-size: 16px; font-weight: 400; margin: 0 auto; padding: 30px 0px 80px 0px;}
table {border-collapse: collapse; margin-left: auto; margin-right: auto;}
td {border-bottom: 1px solid #ddd; padding: 15px; text-align: left;}
.top_container {margin: 0 auto; width: 500px; background-color: #f7f7f7; box-shadow: 0px 0px 5px 3px rgba(192, 192, 192, 0.37); padding: 15px; margin-bottom: 30px;}
</style>
</head>
<body>
<div class="top_container">
The images in this folder can be used in Lazarus applications as toolbar or button icons.<br><br>
They come in several sizes as required by the LCL scaling for high-dpi screens:<br><br>
- 16x16, 24x24 and 32x32 pixels for "small" images, and<br>
- 24x24, 36x36 and 48x48 pixels for "medium" sized images, and<br>
- 32x32, 48x48 and 64x64 pixels for "large" images.<br><br>
The images were kindly provided by Roland Hahn.<br><br>
License:<br>
Creative Commons CC0 1.0 Universal<br>
(freely available, no restrictions in usage)
</div>
<table>
<tr>
<td>Add_01</td>
<td><img src="Add_01_16.png" alt=""></td>
<td><img src="Add_01_24.png" alt=""></td>
<td><img src="Add_01_32.png" alt=""></td>
<td><img src="Add_01_36.png" alt=""></td>
<td><img src="Add_01_48.png" alt=""></td>
<td><img src="Add_01_64.png" alt=""></td>
</tr>
<tr>
<td>Add_02</td>
<td><img src="Add_02_16.png" alt=""></td>
<td><img src="Add_02_24.png" alt=""></td>
<td><img src="Add_02_32.png" alt=""></td>
<td><img src="Add_02_36.png" alt=""></td>
<td><img src="Add_02_48.png" alt=""></td>
<td><img src="Add_02_64.png" alt=""></td>
</tr>
<tr>
<td>Add_03</td>
<td><img src="Add_03_16.png" alt=""></td>
<td><img src="Add_03_24.png" alt=""></td>
<td><img src="Add_03_32.png" alt=""></td>
<td><img src="Add_03_36.png" alt=""></td>
<td><img src="Add_03_48.png" alt=""></td>
<td><img src="Add_03_64.png" alt=""></td>
</tr>
<tr>
<td>Add_04</td>
<td><img src="Add_04_16.png" alt=""></td>
<td><img src="Add_04_24.png" alt=""></td>
<td><img src="Add_04_32.png" alt=""></td>
<td><img src="Add_04_36.png" alt=""></td>
<td><img src="Add_04_48.png" alt=""></td>
<td><img src="Add_04_64.png" alt=""></td>
</tr>
<tr>
<td>Arrow_01</td>
<td><img src="Arrow_01_16.png" alt=""></td>
<td><img src="Arrow_01_24.png" alt=""></td>
<td><img src="Arrow_01_32.png" alt=""></td>
<td><img src="Arrow_01_36.png" alt=""></td>
<td><img src="Arrow_01_48.png" alt=""></td>
<td><img src="Arrow_01_64.png" alt=""></td>
</tr>
<tr>
<td>Cancel_01</td>
<td><img src="Cancel_01_16.png" alt=""></td>
<td><img src="Cancel_01_24.png" alt=""></td>
<td><img src="Cancel_01_32.png" alt=""></td>
<td><img src="Cancel_01_36.png" alt=""></td>
<td><img src="Cancel_01_48.png" alt=""></td>
<td><img src="Cancel_01_64.png" alt=""></td>
</tr>
<tr>
<td>Cancel_02</td>
<td><img src="Cancel_02_16.png" alt=""></td>
<td><img src="Cancel_02_24.png" alt=""></td>
<td><img src="Cancel_02_32.png" alt=""></td>
<td><img src="Cancel_02_36.png" alt=""></td>
<td><img src="Cancel_02_48.png" alt=""></td>
<td><img src="Cancel_02_64.png" alt=""></td>
</tr>
<tr>
<td>Copy_01</td>
<td><img src="Copy_01_16.png" alt=""></td>
<td><img src="Copy_01_24.png" alt=""></td>
<td><img src="Copy_01_32.png" alt=""></td>
<td><img src="Copy_01_36.png" alt=""></td>
<td><img src="Copy_01_48.png" alt=""></td>
<td><img src="Copy_01_64.png" alt=""></td>
</tr>
<tr>
<td>Copy_02</td>
<td><img src="Copy_02_16.png" alt=""></td>
<td><img src="Copy_02_24.png" alt=""></td>
<td><img src="Copy_02_32.png" alt=""></td>
<td><img src="Copy_02_36.png" alt=""></td>
<td><img src="Copy_02_48.png" alt=""></td>
<td><img src="Copy_02_64.png" alt=""></td>
</tr>
<tr>
<td>Copyright_01</td>
<td><img src="Copyright_01_16.png" alt=""></td>
<td><img src="Copyright_01_24.png" alt=""></td>
<td><img src="Copyright_01_32.png" alt=""></td>
<td><img src="Copyright_01_36.png" alt=""></td>
<td><img src="Copyright_01_48.png" alt=""></td>
<td><img src="Copyright_01_64.png" alt=""></td>
</tr>
<tr>
<td>Cut_01</td>
<td><img src="Cut_01_16.png" alt=""></td>
<td><img src="Cut_01_24.png" alt=""></td>
<td><img src="Cut_01_32.png" alt=""></td>
<td><img src="Cut_01_36.png" alt=""></td>
<td><img src="Cut_01_48.png" alt=""></td>
<td><img src="Cut_01_64.png" alt=""></td>
</tr>
<tr>
<td>Delete_01</td>
<td><img src="Delete_01_16.png" alt=""></td>
<td><img src="Delete_01_24.png" alt=""></td>
<td><img src="Delete_01_32.png" alt=""></td>
<td><img src="Delete_01_36.png" alt=""></td>
<td><img src="Delete_01_48.png" alt=""></td>
<td><img src="Delete_01_64.png" alt=""></td>
</tr>
<tr>
<td>Download_01</td>
<td><img src="Download_01_16.png" alt=""></td>
<td><img src="Download_01_24.png" alt=""></td>
<td><img src="Download_01_32.png" alt=""></td>
<td><img src="Download_01_36.png" alt=""></td>
<td><img src="Download_01_48.png" alt=""></td>
<td><img src="Download_01_64.png" alt=""></td>
</tr>
<tr>
<td>Edit_01</td>
<td><img src="Edit_01_16.png" alt=""></td>
<td><img src="Edit_01_24.png" alt=""></td>
<td><img src="Edit_01_32.png" alt=""></td>
<td><img src="Edit_01_36.png" alt=""></td>
<td><img src="Edit_01_48.png" alt=""></td>
<td><img src="Edit_01_64.png" alt=""></td>
</tr>
<tr>
<td>Error_01</td>
<td><img src="Error_01_16.png" alt=""></td>
<td><img src="Error_01_24.png" alt=""></td>
<td><img src="Error_01_32.png" alt=""></td>
<td><img src="Error_01_36.png" alt=""></td>
<td><img src="Error_01_48.png" alt=""></td>
<td><img src="Error_01_64.png" alt=""></td>
</tr>
<tr>
<td>Exit_01</td>
<td><img src="Exit_01_16.png" alt=""></td>
<td><img src="Exit_01_24.png" alt=""></td>
<td><img src="Exit_01_32.png" alt=""></td>
<td><img src="Exit_01_36.png" alt=""></td>
<td><img src="Exit_01_48.png" alt=""></td>
<td><img src="Exit_01_64.png" alt=""></td>
</tr>
<tr>
<td>Exit_02</td>
<td><img src="Exit_02_16.png" alt=""></td>
<td><img src="Exit_02_24.png" alt=""></td>
<td><img src="Exit_02_32.png" alt=""></td>
<td><img src="Exit_02_36.png" alt=""></td>
<td><img src="Exit_02_48.png" alt=""></td>
<td><img src="Exit_02_64.png" alt=""></td>
</tr>
<tr>
<td>Export_01</td>
<td><img src="Export_01_16.png" alt=""></td>
<td><img src="Export_01_24.png" alt=""></td>
<td><img src="Export_01_32.png" alt=""></td>
<td><img src="Export_01_36.png" alt=""></td>
<td><img src="Export_01_48.png" alt=""></td>
<td><img src="Export_01_64.png" alt=""></td>
</tr>
<tr>
<td>File_01</td>
<td><img src="File_01_16.png" alt=""></td>
<td><img src="File_01_24.png" alt=""></td>
<td><img src="File_01_32.png" alt=""></td>
<td><img src="File_01_36.png" alt=""></td>
<td><img src="File_01_48.png" alt=""></td>
<td><img src="File_01_64.png" alt=""></td>
</tr>
<tr>
<td>File_02</td>
<td><img src="File_02_16.png" alt=""></td>
<td><img src="File_02_24.png" alt=""></td>
<td><img src="File_02_32.png" alt=""></td>
<td><img src="File_02_36.png" alt=""></td>
<td><img src="File_02_48.png" alt=""></td>
<td><img src="File_02_64.png" alt=""></td>
</tr>
<tr>
<td>File_03</td>
<td><img src="File_03_16.png" alt=""></td>
<td><img src="File_03_24.png" alt=""></td>
<td><img src="File_03_32.png" alt=""></td>
<td><img src="File_03_36.png" alt=""></td>
<td><img src="File_03_48.png" alt=""></td>
<td><img src="File_03_64.png" alt=""></td>
</tr>
<tr>
<td>Folder_01</td>
<td><img src="Folder_01_16.png" alt=""></td>
<td><img src="Folder_01_24.png" alt=""></td>
<td><img src="Folder_01_32.png" alt=""></td>
<td><img src="Folder_01_36.png" alt=""></td>
<td><img src="Folder_01_48.png" alt=""></td>
<td><img src="Folder_01_64.png" alt=""></td>
</tr>
<tr>
<td>Folder_02</td>
<td><img src="Folder_02_16.png" alt=""></td>
<td><img src="Folder_02_24.png" alt=""></td>
<td><img src="Folder_02_32.png" alt=""></td>
<td><img src="Folder_02_36.png" alt=""></td>
<td><img src="Folder_02_48.png" alt=""></td>
<td><img src="Folder_02_64.png" alt=""></td>
</tr>
<tr>
<td>Folder_03</td>
<td><img src="Folder_03_16.png" alt=""></td>
<td><img src="Folder_03_24.png" alt=""></td>
<td><img src="Folder_03_32.png" alt=""></td>
<td><img src="Folder_03_36.png" alt=""></td>
<td><img src="Folder_03_48.png" alt=""></td>
<td><img src="Folder_03_64.png" alt=""></td>
</tr>
<tr>
<td>Help_01</td>
<td><img src="Help_01_16.png" alt=""></td>
<td><img src="Help_01_24.png" alt=""></td>
<td><img src="Help_01_32.png" alt=""></td>
<td><img src="Help_01_36.png" alt=""></td>
<td><img src="Help_01_48.png" alt=""></td>
<td><img src="Help_01_64.png" alt=""></td>
</tr>
<tr>
<td>Help_02</td>
<td><img src="Help_02_16.png" alt=""></td>
<td><img src="Help_02_24.png" alt=""></td>
<td><img src="Help_02_32.png" alt=""></td>
<td><img src="Help_02_36.png" alt=""></td>
<td><img src="Help_02_48.png" alt=""></td>
<td><img src="Help_02_64.png" alt=""></td>
</tr>
<tr>
<td>Help_03</td>
<td><img src="Help_03_16.png" alt=""></td>
<td><img src="Help_03_24.png" alt=""></td>
<td><img src="Help_03_32.png" alt=""></td>
<td><img src="Help_03_36.png" alt=""></td>
<td><img src="Help_03_48.png" alt=""></td>
<td><img src="Help_03_64.png" alt=""></td>
</tr>
<tr>
<td>Info_01</td>
<td><img src="Info_01_16.png" alt=""></td>
<td><img src="Info_01_24.png" alt=""></td>
<td><img src="Info_01_32.png" alt=""></td>
<td><img src="Info_01_36.png" alt=""></td>
<td><img src="Info_01_48.png" alt=""></td>
<td><img src="Info_01_64.png" alt=""></td>
</tr>
<tr>
<td>Menu_01</td>
<td><img src="Menu_01_16.png" alt=""></td>
<td><img src="Menu_01_24.png" alt=""></td>
<td><img src="Menu_01_32.png" alt=""></td>
<td><img src="Menu_01_36.png" alt=""></td>
<td><img src="Menu_01_48.png" alt=""></td>
<td><img src="Menu_01_64.png" alt=""></td>
</tr>
<tr>
<td>Ok_01</td>
<td><img src="Ok_01_16.png" alt=""></td>
<td><img src="Ok_01_24.png" alt=""></td>
<td><img src="Ok_01_32.png" alt=""></td>
<td><img src="Ok_01_36.png" alt=""></td>
<td><img src="Ok_01_48.png" alt=""></td>
<td><img src="Ok_01_64.png" alt=""></td>
</tr>
<tr>
<td>Ok_02</td>
<td><img src="Ok_02_16.png" alt=""></td>
<td><img src="Ok_02_24.png" alt=""></td>
<td><img src="Ok_02_32.png" alt=""></td>
<td><img src="Ok_02_36.png" alt=""></td>
<td><img src="Ok_02_48.png" alt=""></td>
<td><img src="Ok_02_64.png" alt=""></td>
</tr>
<tr>
<td>Ok_03</td>
<td><img src="Ok_03_16.png" alt=""></td>
<td><img src="Ok_03_24.png" alt=""></td>
<td><img src="Ok_03_32.png" alt=""></td>
<td><img src="Ok_03_36.png" alt=""></td>
<td><img src="Ok_03_48.png" alt=""></td>
<td><img src="Ok_03_64.png" alt=""></td>
</tr>
<tr>
<td>Ok_04</td>
<td><img src="Ok_04_16.png" alt=""></td>
<td><img src="Ok_04_24.png" alt=""></td>
<td><img src="Ok_04_32.png" alt=""></td>
<td><img src="Ok_04_36.png" alt=""></td>
<td><img src="Ok_04_48.png" alt=""></td>
<td><img src="Ok_04_64.png" alt=""></td>
</tr>
<tr>
<td>Open_01</td>
<td><img src="Open_01_16.png" alt=""></td>
<td><img src="Open_01_24.png" alt=""></td>
<td><img src="Open_01_32.png" alt=""></td>
<td><img src="Open_01_36.png" alt=""></td>
<td><img src="Open_01_48.png" alt=""></td>
<td><img src="Open_01_64.png" alt=""></td>
</tr>
<tr>
<td>Open_02</td>
<td><img src="Open_02_16.png" alt=""></td>
<td><img src="Open_02_24.png" alt=""></td>
<td><img src="Open_02_32.png" alt=""></td>
<td><img src="Open_02_36.png" alt=""></td>
<td><img src="Open_02_48.png" alt=""></td>
<td><img src="Open_02_64.png" alt=""></td>
</tr>
<tr>
<td>Paint_01</td>
<td><img src="Paint_01_16.png" alt=""></td>
<td><img src="Paint_01_24.png" alt=""></td>
<td><img src="Paint_01_32.png" alt=""></td>
<td><img src="Paint_01_36.png" alt=""></td>
<td><img src="Paint_01_48.png" alt=""></td>
<td><img src="Paint_01_64.png" alt=""></td>
</tr>
<tr>
<td>Paste_01</td>
<td><img src="Paste_01_16.png" alt=""></td>
<td><img src="Paste_01_24.png" alt=""></td>
<td><img src="Paste_01_32.png" alt=""></td>
<td><img src="Paste_01_36.png" alt=""></td>
<td><img src="Paste_01_48.png" alt=""></td>
<td><img src="Paste_01_64.png" alt=""></td>
</tr>
<tr>
<td>Print_01</td>
<td><img src="Print_01_16.png" alt=""></td>
<td><img src="Print_01_24.png" alt=""></td>
<td><img src="Print_01_32.png" alt=""></td>
<td><img src="Print_01_36.png" alt=""></td>
<td><img src="Print_01_48.png" alt=""></td>
<td><img src="Print_01_64.png" alt=""></td>
</tr>
<tr>
<td>Print_02</td>
<td><img src="Print_02_16.png" alt=""></td>
<td><img src="Print_02_24.png" alt=""></td>
<td><img src="Print_02_32.png" alt=""></td>
<td><img src="Print_02_36.png" alt=""></td>
<td><img src="Print_02_48.png" alt=""></td>
<td><img src="Print_02_64.png" alt=""></td>
</tr>
<tr>
<td>Print_03</td>
<td><img src="Print_03_16.png" alt=""></td>
<td><img src="Print_03_24.png" alt=""></td>
<td><img src="Print_03_32.png" alt=""></td>
<td><img src="Print_03_36.png" alt=""></td>
<td><img src="Print_03_48.png" alt=""></td>
<td><img src="Print_03_64.png" alt=""></td>
</tr>
<tr>
<td>Refresh_01</td>
<td><img src="Refresh_01_16.png" alt=""></td>
<td><img src="Refresh_01_24.png" alt=""></td>
<td><img src="Refresh_01_32.png" alt=""></td>
<td><img src="Refresh_01_36.png" alt=""></td>
<td><img src="Refresh_01_48.png" alt=""></td>
<td><img src="Refresh_01_64.png" alt=""></td>
</tr>
<tr>
<td>Refresh_02</td>
<td><img src="Refresh_02_16.png" alt=""></td>
<td><img src="Refresh_02_24.png" alt=""></td>
<td><img src="Refresh_02_32.png" alt=""></td>
<td><img src="Refresh_02_36.png" alt=""></td>
<td><img src="Refresh_02_48.png" alt=""></td>
<td><img src="Refresh_02_64.png" alt=""></td>
</tr>
<tr>
<td>Refresh_03</td>
<td><img src="Refresh_03_16.png" alt=""></td>
<td><img src="Refresh_03_24.png" alt=""></td>
<td><img src="Refresh_03_32.png" alt=""></td>
<td><img src="Refresh_03_36.png" alt=""></td>
<td><img src="Refresh_03_48.png" alt=""></td>
<td><img src="Refresh_03_64.png" alt=""></td>
</tr>
<tr>
<td>Remove_01</td>
<td><img src="Remove_01_16.png" alt=""></td>
<td><img src="Remove_01_24.png" alt=""></td>
<td><img src="Remove_01_32.png" alt=""></td>
<td><img src="Remove_01_36.png" alt=""></td>
<td><img src="Remove_01_48.png" alt=""></td>
<td><img src="Remove_01_64.png" alt=""></td>
</tr>
<tr>
<td>Remove_02</td>
<td><img src="Remove_02_16.png" alt=""></td>
<td><img src="Remove_02_24.png" alt=""></td>
<td><img src="Remove_02_32.png" alt=""></td>
<td><img src="Remove_02_36.png" alt=""></td>
<td><img src="Remove_02_48.png" alt=""></td>
<td><img src="Remove_02_64.png" alt=""></td>
</tr>
<tr>
<td>Remove_03</td>
<td><img src="Remove_03_16.png" alt=""></td>
<td><img src="Remove_03_24.png" alt=""></td>
<td><img src="Remove_03_32.png" alt=""></td>
<td><img src="Remove_03_36.png" alt=""></td>
<td><img src="Remove_03_48.png" alt=""></td>
<td><img src="Remove_03_64.png" alt=""></td>
</tr>
<tr>
<td>Remove_04</td>
<td><img src="Remove_04_16.png" alt=""></td>
<td><img src="Remove_04_24.png" alt=""></td>
<td><img src="Remove_04_32.png" alt=""></td>
<td><img src="Remove_04_36.png" alt=""></td>
<td><img src="Remove_04_48.png" alt=""></td>
<td><img src="Remove_04_64.png" alt=""></td>
</tr>
<tr>
<td>Repeat_01</td>
<td><img src="Repeat_01_16.png" alt=""></td>
<td><img src="Repeat_01_24.png" alt=""></td>
<td><img src="Repeat_01_32.png" alt=""></td>
<td><img src="Repeat_01_36.png" alt=""></td>
<td><img src="Repeat_01_48.png" alt=""></td>
<td><img src="Repeat_01_64.png" alt=""></td>
</tr>
<tr>
<td>Replace_01</td>
<td><img src="Replace_01_16.png" alt=""></td>
<td><img src="Replace_01_24.png" alt=""></td>
<td><img src="Replace_01_32.png" alt=""></td>
<td><img src="Replace_01_36.png" alt=""></td>
<td><img src="Replace_01_48.png" alt=""></td>
<td><img src="Replace_01_64.png" alt=""></td>
</tr>
<tr>
<td>Replace_02</td>
<td><img src="Replace_02_16.png" alt=""></td>
<td><img src="Replace_02_24.png" alt=""></td>
<td><img src="Replace_02_32.png" alt=""></td>
<td><img src="Replace_02_36.png" alt=""></td>
<td><img src="Replace_02_48.png" alt=""></td>
<td><img src="Replace_02_64.png" alt=""></td>
</tr>
<tr>
<td>Replace_03</td>
<td><img src="Replace_03_16.png" alt=""></td>
<td><img src="Replace_03_24.png" alt=""></td>
<td><img src="Replace_03_32.png" alt=""></td>
<td><img src="Replace_03_36.png" alt=""></td>
<td><img src="Replace_03_48.png" alt=""></td>
<td><img src="Replace_03_64.png" alt=""></td>
</tr>
<tr>
<td>Save_01</td>
<td><img src="Save_01_16.png" alt=""></td>
<td><img src="Save_01_24.png" alt=""></td>
<td><img src="Save_01_32.png" alt=""></td>
<td><img src="Save_01_36.png" alt=""></td>
<td><img src="Save_01_48.png" alt=""></td>
<td><img src="Save_01_64.png" alt=""></td>
</tr>
<tr>
<td>Save_02</td>
<td><img src="Save_02_16.png" alt=""></td>
<td><img src="Save_02_24.png" alt=""></td>
<td><img src="Save_02_32.png" alt=""></td>
<td><img src="Save_02_36.png" alt=""></td>
<td><img src="Save_02_48.png" alt=""></td>
<td><img src="Save_02_64.png" alt=""></td>
</tr>
<tr>
<td>SaveAs_01</td>
<td><img src="SaveAs_01_16.png" alt=""></td>
<td><img src="SaveAs_01_24.png" alt=""></td>
<td><img src="SaveAs_01_32.png" alt=""></td>
<td><img src="SaveAs_01_36.png" alt=""></td>
<td><img src="SaveAs_01_48.png" alt=""></td>
<td><img src="SaveAs_01_64.png" alt=""></td>
</tr>
<tr>
<td>Search_01</td>
<td><img src="Search_01_16.png" alt=""></td>
<td><img src="Search_01_24.png" alt=""></td>
<td><img src="Search_01_32.png" alt=""></td>
<td><img src="Search_01_36.png" alt=""></td>
<td><img src="Search_01_48.png" alt=""></td>
<td><img src="Search_01_64.png" alt=""></td>
</tr>
<tr>
<td>Search_02</td>
<td><img src="Search_02_16.png" alt=""></td>
<td><img src="Search_02_24.png" alt=""></td>
<td><img src="Search_02_32.png" alt=""></td>
<td><img src="Search_02_36.png" alt=""></td>
<td><img src="Search_02_48.png" alt=""></td>
<td><img src="Search_02_64.png" alt=""></td>
</tr>
<tr>
<td>Search_03</td>
<td><img src="Search_03_16.png" alt=""></td>
<td><img src="Search_03_24.png" alt=""></td>
<td><img src="Search_03_32.png" alt=""></td>
<td><img src="Search_03_36.png" alt=""></td>
<td><img src="Search_03_48.png" alt=""></td>
<td><img src="Search_03_64.png" alt=""></td>
</tr>
<tr>
<td>Setup_01</td>
<td><img src="Setup_01_16.png" alt=""></td>
<td><img src="Setup_01_24.png" alt=""></td>
<td><img src="Setup_01_32.png" alt=""></td>
<td><img src="Setup_01_36.png" alt=""></td>
<td><img src="Setup_01_48.png" alt=""></td>
<td><img src="Setup_01_64.png" alt=""></td>
</tr>
<tr>
<td>Setup_02</td>
<td><img src="Setup_02_16.png" alt=""></td>
<td><img src="Setup_02_24.png" alt=""></td>
<td><img src="Setup_02_32.png" alt=""></td>
<td><img src="Setup_02_36.png" alt=""></td>
<td><img src="Setup_02_48.png" alt=""></td>
<td><img src="Setup_02_64.png" alt=""></td>
</tr>
<tr>
<td>Setup_03</td>
<td><img src="Setup_03_16.png" alt=""></td>
<td><img src="Setup_03_24.png" alt=""></td>
<td><img src="Setup_03_32.png" alt=""></td>
<td><img src="Setup_03_36.png" alt=""></td>
<td><img src="Setup_03_48.png" alt=""></td>
<td><img src="Setup_03_64.png" alt=""></td>
</tr>
<tr>
<td>Setup_04</td>
<td><img src="Setup_04_16.png" alt=""></td>
<td><img src="Setup_04_24.png" alt=""></td>
<td><img src="Setup_04_32.png" alt=""></td>
<td><img src="Setup_04_36.png" alt=""></td>
<td><img src="Setup_04_48.png" alt=""></td>
<td><img src="Setup_04_64.png" alt=""></td>
</tr>
<tr>
<td>Setup_05</td>
<td><img src="Setup_05_16.png" alt=""></td>
<td><img src="Setup_05_24.png" alt=""></td>
<td><img src="Setup_05_32.png" alt=""></td>
<td><img src="Setup_05_36.png" alt=""></td>
<td><img src="Setup_05_48.png" alt=""></td>
<td><img src="Setup_05_64.png" alt=""></td>
</tr>
<tr>
<td>Setup_06</td>
<td><img src="Setup_06_16.png" alt=""></td>
<td><img src="Setup_06_24.png" alt=""></td>
<td><img src="Setup_06_32.png" alt=""></td>
<td><img src="Setup_06_36.png" alt=""></td>
<td><img src="Setup_06_48.png" alt=""></td>
<td><img src="Setup_06_64.png" alt=""></td>
</tr>
<tr>
<td>Time_01</td>
<td><img src="Time_01_16.png" alt=""></td>
<td><img src="Time_01_24.png" alt=""></td>
<td><img src="Time_01_32.png" alt=""></td>
<td><img src="Time_01_36.png" alt=""></td>
<td><img src="Time_01_48.png" alt=""></td>
<td><img src="Time_01_64.png" alt=""></td>
</tr>
<tr>
<td>Time_02</td>
<td><img src="Time_02_16.png" alt=""></td>
<td><img src="Time_02_24.png" alt=""></td>
<td><img src="Time_02_32.png" alt=""></td>
<td><img src="Time_02_36.png" alt=""></td>
<td><img src="Time_02_48.png" alt=""></td>
<td><img src="Time_02_64.png" alt=""></td>
</tr>
<tr>
<td>Time_03</td>
<td><img src="Time_03_16.png" alt=""></td>
<td><img src="Time_03_24.png" alt=""></td>
<td><img src="Time_03_32.png" alt=""></td>
<td><img src="Time_03_36.png" alt=""></td>
<td><img src="Time_03_48.png" alt=""></td>
<td><img src="Time_03_64.png" alt=""></td>
</tr>
<tr>
<td>Time_04</td>
<td><img src="Time_04_16.png" alt=""></td>
<td><img src="Time_04_24.png" alt=""></td>
<td><img src="Time_04_32.png" alt=""></td>
<td><img src="Time_04_36.png" alt=""></td>
<td><img src="Time_04_48.png" alt=""></td>
<td><img src="Time_04_64.png" alt=""></td>
</tr>
<tr>
<td>Undo_01</td>
<td><img src="Undo_01_16.png" alt=""></td>
<td><img src="Undo_01_24.png" alt=""></td>
<td><img src="Undo_01_32.png" alt=""></td>
<td><img src="Undo_01_36.png" alt=""></td>
<td><img src="Undo_01_48.png" alt=""></td>
<td><img src="Undo_01_64.png" alt=""></td>
</tr>
<tr>
<td>Window_01</td>
<td><img src="Window_01_16.png" alt=""></td>
<td><img src="Window_01_24.png" alt=""></td>
<td><img src="Window_01_32.png" alt=""></td>
<td><img src="Window_01_36.png" alt=""></td>
<td><img src="Window_01_48.png" alt=""></td>
<td><img src="Window_01_64.png" alt=""></td>
</tr>
<tr>
<td>Zoom_01</td>
<td><img src="Zoom_01_16.png" alt=""></td>
<td><img src="Zoom_01_24.png" alt=""></td>
<td><img src="Zoom_01_32.png" alt=""></td>
<td><img src="Zoom_01_36.png" alt=""></td>
<td><img src="Zoom_01_48.png" alt=""></td>
<td><img src="Zoom_01_64.png" alt=""></td>
</tr>
<tr>
<td>Zoom_02</td>
<td><img src="Zoom_02_16.png" alt=""></td>
<td><img src="Zoom_02_24.png" alt=""></td>
<td><img src="Zoom_02_32.png" alt=""></td>
<td><img src="Zoom_02_36.png" alt=""></td>
<td><img src="Zoom_02_48.png" alt=""></td>
<td><img src="Zoom_02_64.png" alt=""></td>
</tr>
</table>
</body>
</html>

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.7 KiB

View File

@ -0,0 +1,142 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="12"/>
<PathDelim Value="\"/>
<General>
<Flags>
<CompatibilityMode Value="True"/>
</Flags>
<SessionStorage Value="InProjectDir"/>
<Title Value="IconTable"/>
<Scaled Value="True"/>
<ResourceType Value="res"/>
<UseXPManifest Value="True"/>
<XPManifest>
<DpiAware Value="True"/>
</XPManifest>
<Icon Value="0"/>
</General>
<BuildModes Count="2">
<Item1 Name="Debug" Default="True"/>
<Item2 Name="Release">
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<Target>
<Filename Value="IconTable"/>
</Target>
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)"/>
<OtherUnitFiles Value="D:\LazarusProg\rhsUnit\"/>
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
</SearchPaths>
<CodeGeneration>
<SmartLinkUnit Value="True"/>
<Optimizations>
<OptimizationLevel Value="2"/>
</Optimizations>
</CodeGeneration>
<Linking>
<Debugging>
<GenerateDebugInfo Value="False"/>
<DebugInfoType Value="dsDwarf2Set"/>
</Debugging>
<LinkSmart Value="True"/>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
</CompilerOptions>
</Item2>
</BuildModes>
<PublishOptions>
<Version Value="2"/>
<UseFileFilters Value="True"/>
</PublishOptions>
<RunParams>
<FormatVersion Value="2"/>
</RunParams>
<RequiredPackages Count="3">
<Item1>
<PackageName Value="SynEditDsgn"/>
</Item1>
<Item2>
<PackageName Value="SynEdit"/>
</Item2>
<Item3>
<PackageName Value="LCL"/>
</Item3>
</RequiredPackages>
<Units Count="2">
<Unit0>
<Filename Value="IconTable.lpr"/>
<IsPartOfProject Value="True"/>
</Unit0>
<Unit1>
<Filename Value="main.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="MainForm"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
</Unit1>
</Units>
</ProjectOptions>
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<Target>
<Filename Value="IconTable"/>
</Target>
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)"/>
<OtherUnitFiles Value="D:\LazarusProg\rhsUnit\"/>
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
</SearchPaths>
<Parsing>
<SyntaxOptions>
<IncludeAssertionCode Value="True"/>
</SyntaxOptions>
</Parsing>
<CodeGeneration>
<Checks>
<IOChecks Value="True"/>
<RangeChecks Value="True"/>
<OverflowChecks Value="True"/>
<StackChecks Value="True"/>
</Checks>
<VerifyObjMethodCallValidity Value="True"/>
<Optimizations>
<OptimizationLevel Value="0"/>
</Optimizations>
</CodeGeneration>
<Linking>
<Debugging>
<DebugInfoType Value="dsDwarf2Set"/>
<UseHeaptrc Value="True"/>
<TrashVariables Value="True"/>
<UseExternalDbgSyms Value="True"/>
</Debugging>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
</CompilerOptions>
<Debugging>
<Exceptions Count="3">
<Item1>
<Name Value="EAbort"/>
</Item1>
<Item2>
<Name Value="ECodetoolError"/>
</Item2>
<Item3>
<Name Value="EFOpenError"/>
</Item3>
</Exceptions>
</Debugging>
</CONFIG>

View File

@ -0,0 +1,22 @@
program IconTable;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, main
{ you can add units after this };
{$R *.res}
begin
RequireDerivedFormResource := True;
Application.Scaled:=True;
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end.

View File

@ -0,0 +1,603 @@
object MainForm: TMainForm
Left = 1036
Height = 515
Top = 208
Width = 600
Caption = 'IconTable'
ClientHeight = 515
ClientWidth = 600
Constraints.MinHeight = 515
Constraints.MinWidth = 600
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '2.3.0.0'
object btnCreateHTML: TButton
AnchorSideRight.Control = btnSave
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 374
Height = 25
Top = 480
Width = 95
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 8
BorderSpacing.Bottom = 10
Caption = 'Create HTML'
Default = True
OnClick = btnCreateHTMLClick
TabOrder = 0
end
object DirectoryEdit: TDirectoryEdit
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 10
Height = 23
Top = 10
Width = 580
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 10
BorderSpacing.Top = 10
BorderSpacing.Right = 10
MaxLength = 0
TabOrder = 3
end
object btnSave: TButton
AnchorSideRight.Control = btnClose
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 477
Height = 25
Top = 480
Width = 50
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 8
BorderSpacing.Bottom = 10
Caption = 'Save'
OnClick = btnSaveClick
TabOrder = 1
end
object btnClose: TButton
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 535
Height = 25
Top = 480
Width = 55
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 10
BorderSpacing.Bottom = 10
Cancel = True
Caption = 'Close'
OnClick = btnCloseClick
TabOrder = 2
end
inline SynEdit: TSynEdit
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = DirectoryEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = btnClose
Left = 10
Height = 427
Top = 43
Width = 580
BorderSpacing.Left = 10
BorderSpacing.Top = 10
BorderSpacing.Right = 10
BorderSpacing.Bottom = 10
Anchors = [akTop, akLeft, akRight, akBottom]
Font.Height = -12
Font.Name = 'Courier New'
Font.Pitch = fpFixed
Font.Quality = fqCleartype
ParentColor = False
ParentFont = False
TabOrder = 4
Gutter.Width = 55
Gutter.MouseActions = <>
RightGutter.Width = 0
RightGutter.MouseActions = <>
Highlighter = SynHTMLSyn
Keystrokes = <
item
Command = ecUp
ShortCut = 38
end
item
Command = ecSelUp
ShortCut = 8230
end
item
Command = ecScrollUp
ShortCut = 16422
end
item
Command = ecDown
ShortCut = 40
end
item
Command = ecSelDown
ShortCut = 8232
end
item
Command = ecScrollDown
ShortCut = 16424
end
item
Command = ecLeft
ShortCut = 37
end
item
Command = ecSelLeft
ShortCut = 8229
end
item
Command = ecWordLeft
ShortCut = 16421
end
item
Command = ecSelWordLeft
ShortCut = 24613
end
item
Command = ecRight
ShortCut = 39
end
item
Command = ecSelRight
ShortCut = 8231
end
item
Command = ecWordRight
ShortCut = 16423
end
item
Command = ecSelWordRight
ShortCut = 24615
end
item
Command = ecPageDown
ShortCut = 34
end
item
Command = ecSelPageDown
ShortCut = 8226
end
item
Command = ecPageBottom
ShortCut = 16418
end
item
Command = ecSelPageBottom
ShortCut = 24610
end
item
Command = ecPageUp
ShortCut = 33
end
item
Command = ecSelPageUp
ShortCut = 8225
end
item
Command = ecPageTop
ShortCut = 16417
end
item
Command = ecSelPageTop
ShortCut = 24609
end
item
Command = ecLineStart
ShortCut = 36
end
item
Command = ecSelLineStart
ShortCut = 8228
end
item
Command = ecEditorTop
ShortCut = 16420
end
item
Command = ecSelEditorTop
ShortCut = 24612
end
item
Command = ecLineEnd
ShortCut = 35
end
item
Command = ecSelLineEnd
ShortCut = 8227
end
item
Command = ecEditorBottom
ShortCut = 16419
end
item
Command = ecSelEditorBottom
ShortCut = 24611
end
item
Command = ecToggleMode
ShortCut = 45
end
item
Command = ecCopy
ShortCut = 16429
end
item
Command = ecPaste
ShortCut = 8237
end
item
Command = ecDeleteChar
ShortCut = 46
end
item
Command = ecCut
ShortCut = 8238
end
item
Command = ecDeleteLastChar
ShortCut = 8
end
item
Command = ecDeleteLastChar
ShortCut = 8200
end
item
Command = ecDeleteLastWord
ShortCut = 16392
end
item
Command = ecUndo
ShortCut = 32776
end
item
Command = ecRedo
ShortCut = 40968
end
item
Command = ecLineBreak
ShortCut = 13
end
item
Command = ecSelectAll
ShortCut = 16449
end
item
Command = ecCopy
ShortCut = 16451
end
item
Command = ecBlockIndent
ShortCut = 24649
end
item
Command = ecLineBreak
ShortCut = 16461
end
item
Command = ecInsertLine
ShortCut = 16462
end
item
Command = ecDeleteWord
ShortCut = 16468
end
item
Command = ecBlockUnindent
ShortCut = 24661
end
item
Command = ecPaste
ShortCut = 16470
end
item
Command = ecCut
ShortCut = 16472
end
item
Command = ecDeleteLine
ShortCut = 16473
end
item
Command = ecDeleteEOL
ShortCut = 24665
end
item
Command = ecUndo
ShortCut = 16474
end
item
Command = ecRedo
ShortCut = 24666
end
item
Command = ecGotoMarker0
ShortCut = 16432
end
item
Command = ecGotoMarker1
ShortCut = 16433
end
item
Command = ecGotoMarker2
ShortCut = 16434
end
item
Command = ecGotoMarker3
ShortCut = 16435
end
item
Command = ecGotoMarker4
ShortCut = 16436
end
item
Command = ecGotoMarker5
ShortCut = 16437
end
item
Command = ecGotoMarker6
ShortCut = 16438
end
item
Command = ecGotoMarker7
ShortCut = 16439
end
item
Command = ecGotoMarker8
ShortCut = 16440
end
item
Command = ecGotoMarker9
ShortCut = 16441
end
item
Command = ecSetMarker0
ShortCut = 24624
end
item
Command = ecSetMarker1
ShortCut = 24625
end
item
Command = ecSetMarker2
ShortCut = 24626
end
item
Command = ecSetMarker3
ShortCut = 24627
end
item
Command = ecSetMarker4
ShortCut = 24628
end
item
Command = ecSetMarker5
ShortCut = 24629
end
item
Command = ecSetMarker6
ShortCut = 24630
end
item
Command = ecSetMarker7
ShortCut = 24631
end
item
Command = ecSetMarker8
ShortCut = 24632
end
item
Command = ecSetMarker9
ShortCut = 24633
end
item
Command = EcFoldLevel1
ShortCut = 41009
end
item
Command = EcFoldLevel2
ShortCut = 41010
end
item
Command = EcFoldLevel3
ShortCut = 41011
end
item
Command = EcFoldLevel4
ShortCut = 41012
end
item
Command = EcFoldLevel5
ShortCut = 41013
end
item
Command = EcFoldLevel6
ShortCut = 41014
end
item
Command = EcFoldLevel7
ShortCut = 41015
end
item
Command = EcFoldLevel8
ShortCut = 41016
end
item
Command = EcFoldLevel9
ShortCut = 41017
end
item
Command = EcFoldLevel0
ShortCut = 41008
end
item
Command = EcFoldCurrent
ShortCut = 41005
end
item
Command = EcUnFoldCurrent
ShortCut = 41003
end
item
Command = EcToggleMarkupWord
ShortCut = 32845
end
item
Command = ecNormalSelect
ShortCut = 24654
end
item
Command = ecColumnSelect
ShortCut = 24643
end
item
Command = ecLineSelect
ShortCut = 24652
end
item
Command = ecTab
ShortCut = 9
end
item
Command = ecShiftTab
ShortCut = 8201
end
item
Command = ecMatchBracket
ShortCut = 24642
end
item
Command = ecColSelUp
ShortCut = 40998
end
item
Command = ecColSelDown
ShortCut = 41000
end
item
Command = ecColSelLeft
ShortCut = 40997
end
item
Command = ecColSelRight
ShortCut = 40999
end
item
Command = ecColSelPageDown
ShortCut = 40994
end
item
Command = ecColSelPageBottom
ShortCut = 57378
end
item
Command = ecColSelPageUp
ShortCut = 40993
end
item
Command = ecColSelPageTop
ShortCut = 57377
end
item
Command = ecColSelLineStart
ShortCut = 40996
end
item
Command = ecColSelLineEnd
ShortCut = 40995
end
item
Command = ecColSelEditorTop
ShortCut = 57380
end
item
Command = ecColSelEditorBottom
ShortCut = 57379
end>
MouseActions = <>
MouseTextActions = <>
MouseSelActions = <>
VisibleSpecialChars = [vscSpace, vscTabAtLast]
SelectedColor.BackPriority = 50
SelectedColor.ForePriority = 50
SelectedColor.FramePriority = 50
SelectedColor.BoldPriority = 50
SelectedColor.ItalicPriority = 50
SelectedColor.UnderlinePriority = 50
SelectedColor.StrikeOutPriority = 50
BracketHighlightStyle = sbhsBoth
BracketMatchColor.Background = clNone
BracketMatchColor.Foreground = clNone
BracketMatchColor.Style = [fsBold]
FoldedCodeColor.Background = clNone
FoldedCodeColor.Foreground = clGray
FoldedCodeColor.FrameColor = clGray
MouseLinkColor.Background = clNone
MouseLinkColor.Foreground = clBlue
LineHighlightColor.Background = clNone
LineHighlightColor.Foreground = clNone
inline SynLeftGutterPartList1: TSynGutterPartList
object SynGutterMarks1: TSynGutterMarks
Width = 24
MouseActions = <>
end
object SynGutterLineNumber1: TSynGutterLineNumber
Width = 15
MouseActions = <>
MarkupInfo.Background = clBtnFace
MarkupInfo.Foreground = clNone
DigitCount = 2
ShowOnlyLineNumbersMultiplesOf = 1
ZeroStart = False
LeadingZeros = False
end
object SynGutterChanges1: TSynGutterChanges
Width = 4
MouseActions = <>
ModifiedColor = 59900
SavedColor = clGreen
end
object SynGutterSeparator1: TSynGutterSeparator
Width = 2
MouseActions = <>
MarkupInfo.Background = clWhite
MarkupInfo.Foreground = clGray
end
object SynGutterCodeFolding1: TSynGutterCodeFolding
MouseActions = <>
MarkupInfo.Background = clNone
MarkupInfo.Foreground = clGray
MouseActionsExpanded = <>
MouseActionsCollapsed = <>
end
end
end
object TaskDialog: TTaskDialog
Buttons = <>
RadioButtons = <>
Left = 72
Top = 392
end
object SynHTMLSyn: TSynHTMLSyn
DefaultFilter = 'HTML Document (*.htm,*.html)|*.htm;*.html'
Enabled = False
Left = 304
Top = 224
end
end

View File

@ -0,0 +1,160 @@
unit main;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, Forms, Controls, Dialogs, StdCtrls, EditBtn, FileUtil,
LazUTF8, LazFileUtils, UITypes, SynEdit, SynHighlighterHTML;
type
{ TMainForm }
TMainForm = class(TForm)
btnCreateHTML: TButton;
btnSave: TButton;
btnClose: TButton;
DirectoryEdit: TDirectoryEdit;
SynEdit: TSynEdit;
SynHTMLSyn: TSynHTMLSyn;
TaskDialog: TTaskDialog;
procedure btnCloseClick(Sender: TObject);
procedure btnCreateHTMLClick(Sender: TObject);
procedure btnSaveClick(Sender: TObject);
procedure FormShow(Sender: TObject);
private
public
end;
var
MainForm: TMainForm;
implementation
{$R *.lfm}
{ TMainForm }
procedure TMainForm.FormShow(Sender: TObject);
begin
DirectoryEdit.Text := CleanAndExpandDirectory('../../images/general_purpose/');
end;
procedure TMainForm.btnCreateHTMLClick(Sender: TObject);
var
FileList: TStringList;
PixSizeStr: String;
i: Integer;
begin
SynEdit.Lines.BeginUpdate;
try
SynEdit.Lines.Clear;
SynEdit.Lines.Add('<!DOCTYPE html>');
SynEdit.Lines.Add('<html lang="de">');
SynEdit.Lines.Add('<head>');
SynEdit.Lines.Add('<title>Icons</title>');
SynEdit.Lines.Add('<meta charset="UTF-8">');
SynEdit.Lines.Add('<style media="all">');
SynEdit.Lines.Add(' body {font-family: sans-serif; font-size: 16px; font-weight: 400; margin: 0 auto; padding: 30px 0px 80px 0px;}');
SynEdit.Lines.Add(' table {border-collapse: collapse; margin-left: auto; margin-right: auto;}');
SynEdit.Lines.Add(' td {border-bottom: 1px solid #ddd; padding: 15px; text-align: left;}');
SynEdit.Lines.Add(' .top_container {margin: 0 auto; width: 500px; background-color: #f7f7f7; box-shadow: 0px 0px 5px 3px rgba(192, 192, 192, 0.37); padding: 15px; margin-bottom: 30px;}');
SynEdit.Lines.Add('</style>');
SynEdit.Lines.Add('</head>');
SynEdit.Lines.Add('<body>');
SynEdit.Lines.Add('<div class="top_container">');
SynEdit.Lines.Add('The images in this folder can be used in Lazarus applications as toolbar or button icons.<br><br>');
SynEdit.Lines.Add('They come in several sizes as required by the LCL scaling for high-dpi screens:<br><br>');
SynEdit.Lines.Add('- 16x16, 24x24 and 32x32 pixels for "small" images, and<br>');
SynEdit.Lines.Add('- 24x24, 36x36 and 48x48 pixels for "medium" sized images, and<br>');
SynEdit.Lines.Add('- 32x32, 48x48 and 64x64 pixels for "large" images.<br><br>');
SynEdit.Lines.Add('The images were kindly provided by Roland Hahn.<br><br>');
SynEdit.Lines.Add('License:<br>');
SynEdit.Lines.Add('Creative Commons CC0 1.0 Universal<br>');
SynEdit.Lines.Add('(freely available, no restrictions in usage)');
SynEdit.Lines.Add('</div>');
SynEdit.Lines.Add('<table>');
Screen.BeginWaitCursor;
FileList := TStringList.Create;
try
FindAllFiles(FileList, DirectoryEdit.Text, '*.png', False);
if FileList.Count > 0 then
begin
FileList.Sort;
for i := 0 to FileList.Count - 1 do
begin
FileList.Strings[i] := ChangeFileExt(ExtractFileName(FileList.Strings[i]), '');
PixSizeStr := RightStr(FileList.Strings[i], 3);
if PixSizeStr = '_16' then
begin
SynEdit.Lines.Add(' <tr>');
SynEdit.Lines.Add(' <td>' + Utf8Copy(FileList.Strings[i], 1, UTF8Length(FileList.Strings[i]) - 3) + '</td>');
end;
SynEdit.Lines.Add(' <td><img src="' + FileList.Strings[i] + '.png" alt=""></td>');
if PixSizeStr = '_64' then
SynEdit.Lines.Add(' </tr>');
end;
end else
begin
SynEdit.Lines.Clear;
TaskDialog.Caption := 'Error';
TaskDialog.MainIcon := tdiError;
TaskDialog.Title := 'Error';
TaskDialog.CommonButtons := [tcbOk];
TaskDialog.DefaultButton := tcbOk;
TaskDialog.Text := 'No png image files found in ' + DirectoryEdit.Text;
TaskDialog.Execute;
exit;
end;
finally
FileList.Free;
Screen.EndWaitCursor;
end;
SynEdit.Lines.Add('</table>');
SynEdit.Lines.Add('</body>');
SynEdit.Lines.Add('</html>');
finally
SynEdit.Lines.EndUpdate;
end;
end;
procedure TMainForm.btnSaveClick(Sender: TObject);
var
fn: String;
begin
fn := AppendPathDelim(DirectoryEdit.Text) + 'IconTable.html';
try
SynEdit.Lines.SaveToFile(fn);
except
TaskDialog.Caption := 'Error';
TaskDialog.MainIcon := tdiError;
TaskDialog.Title := 'Error';
TaskDialog.CommonButtons := [tcbOk];
TaskDialog.DefaultButton := tcbOk;
TaskDialog.Text := 'The file could not be saved as: ' + fn;
TaskDialog.Execute;
Exit;
end;
TaskDialog.Caption := 'Information';
TaskDialog.MainIcon := tdiInformation;
TaskDialog.Title := 'Information';
TaskDialog.CommonButtons := [tcbOk];
TaskDialog.DefaultButton := tcbOk;
TaskDialog.Text := 'Saved as: ' + fn;
TaskDialog.Execute;
end;
procedure TMainForm.btnCloseClick(Sender: TObject);
begin
Close;
end;
end.