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 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989
|
object Form1: TForm1
Left = 776
Height = 436
Top = 207
Width = 1022
ActiveControl = cochenormale
Caption = 'OptGeo'
ClientHeight = 408
ClientWidth = 1022
Font.Name = 'Default'
Menu = MainMenu1
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDeactivate = FormDeactivate
OnDestroy = FormDestroy
OnKeyPress = FormKeyPress
OnResize = FormResize
OnShow = FormShow
LCLVersion = '1.8.0.6'
object StatusBar1: TStatusBar
Left = 0
Height = 22
Top = 386
Width = 1022
Font.Height = -13
Font.Name = 'Default'
Panels = <
item
Text = 'X='
Width = 120
end
item
Text = 'Y='
Width = 120
end
item
Width = 350
end
item
Width = 50
end>
ParentFont = False
SimplePanel = False
end
object ToolBar1: TToolBar
Left = 0
Height = 33
Top = 0
Width = 1022
ButtonHeight = 25
ButtonWidth = 25
ParentFont = False
TabOrder = 1
object StaticText2: TLabel
Left = 1
Height = 20
Top = 2
Width = 51
Caption = 'Miroirs:'
Color = clBtnFace
Font.Color = clBlue
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
Transparent = False
end
object boutonmiroirplan: TSpeedButton
Left = 52
Height = 25
Hint = 'Ajouter un miroir plan'
Top = 2
Width = 27
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFFFFFFF
FFFFFFFF0000FF0FFFFFFFFFFFFFFFFF0000FF0FFFFFFFFFFFFFFFFF00000F0F
FFFFFFFFFFFFFFFF0000F00FFFFFFFFFFFFFFFFF0000FF0FF0FFFFFFFFFFFFFF
000000FFF0FFFFFFFFFFFFFF0000000FF0F0FFFFFFFFFFFF0000000000F0FFFF
FFFF00000000F00000F0F0FFFFFF0FFF0000FFF00000F0FFFFFFF0FF0000FFFF
0000F0F0FFFFFF0F0000FFFFF00000F0FFFFFFF00000FFFFFF000000F0FFFFF0
0000FFFFFFFF0000F0FF0FF00000FFFFFFFFF00000F0F00F0000FFFFFFFFFF00
00F0FFFF0000FFFFFFFFFFF00000FFFF0000FFFFFFFFFFFF00000FFF0000FFFF
FFFFFFFFFF000FFF0000
}
OnClick = boutonmiroirplanClick
ShowHint = True
ParentShowHint = False
end
object boutonlsr: TSpeedButton
Left = 79
Height = 25
Hint = 'Ajouter une lame semi-réfléchissante'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFF0FFF
FFFFFFFF0000FF00FFFF0FFFFFFFFFFF0000FF000FFF0FFFFFFFFFFF0000FFF0
00F00FFFFFFFFFFF0000FFFF000F0FFFFFFFFFFF0000FFFFF000FFFFFFFFFFFF
0000FFFFFF000FFFFFFFFFFF0000FFFFFFF000FFFFFFFFFF0000FFFFFFFF000F
FFFFFFFF0000FFFFFFFFF000FFFFFFFF000000F00F00F0000F00F00F0000FFFF
FFFFFFF000FFFFFF0000FFFFFFFFF0FF000FFFFF0000FFFFFFFFF0FFF000FFFF
0000FFFFFFFFFFFFFF000FFF0000FFFFFFFFF0FFFFF000FF0000FFFFFFFFF0FF
FF00000F0000FFFFFFFFFFFFFF0FF00F0000FFFFFFFFF0FFFFF0FFFF0000FFFF
FFFFF0FFFF00FFFF0000
}
OnClick = boutonlsrClick
ShowHint = True
ParentShowHint = False
end
object boutonmscopa: TSpeedButton
Left = 104
Height = 25
Hint = 'Ajouter un miroir sphérique concave paraxial'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF0F00F
FFFFFFFF0000FFFFFFF0F000FFFFFF0F0000FFFFFFF0FF0000FFF0FF0000FFFF
FF00FFF0000F0FFF0000FFFFFFF0FFFFF000FF0F0000FFFFFFFFFFFFF00FF0FF
0000FFFFFFFFFFFFF00F0FFF0000F0FFFFFFFFFFF000FF0F0000F0FFFFFFFFFF
F00FF0FF0000F0FF00F00F00F00F0FFF0000F000FFFFFFFFF000FF0F0000F0FF
FFFFFFFFF00FF0FF0000F000FFFFFFFFF00F0FFF0000FFFFFFFFFFFFF000FF0F
0000FFFFFFFFFFFFF00FF0FF0000FFFFF00FFFFFF00F0FFF0000FFFFF0FFFFF0
0000FFFF0000FFFFFF0FFF0000FFFFFF0000FFFFF00FF000FFFFFFFF0000FFFF
F0FFF00FFFFFFFFF0000
}
OnClick = boutonmscopaClick
ShowHint = True
ParentShowHint = False
end
object boutonmscepa: TSpeedButton
Left = 129
Height = 25
Hint = 'Ajouter un miroir sphérique convexe paraxial'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFF00FFF0FFF
FFFFFFFF0000FF000FFF0FFFFFFFFFFF0000F000FFFF0FFFFFFFFFFF0000000F
FFF00FFFFFFFFFFF000000FF0FFF0FFFFFFFFFFF000000F0FFFFFFFFFFFFFFFF
0000000FFFFFFFFFFFFFFFFF000000FF0FFFFFFFFFFFFFFF000000F0FFFFFFFF
FFFFFFFF00000000000F00F0000F00FF000000FF0FFFFFFFFFF0FFFF000000F0
FFFFFFFFFFF0FFFF0000000FFFFFFFFFFFF000FF000000FF0FFFFFFFFFF0FFFF
000000F0FFFFFFFFFFF000FF0000000FFF00FFFFFFFFFFFF0000000FFF0FFFFF
FFFFFFFF0000F000FFF0FFFFFFFFFFFF0000FF000F00FFFFFFFFFFFF0000FFF0
0F0FFFFFFFFFFFFF0000
}
OnClick = boutonmscepaClick
ShowHint = True
ParentShowHint = False
end
object boutonmscore: TSpeedButton
Left = 154
Height = 25
Hint = 'Ajouter un miroir sphérique concave réel'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFF0F
F00FF0F00000FFFFFFFFFF0F00FF0F0F0000FFFFFFFFFF0F0000F0FF0000FFFF
FFFFF00FFF000FFF0000FFFFFFFFFF0FFFFF0FFF0000FFFFFFFFFFFFFFFF00F0
0000FFFFFFFFFFFFFFFFF00F0000FFFFFFFFFFFFFFFFF00F0000FFFFFFFFFFFF
FFFFFF0F0000F00F0000F00F0000FF000000FF00FFFFFFFFFFFFFF000000F0FF
FFFFFFFFFFFFFF000000F0FFFFFFFFFFFFFFF00F0000FF00FFFFFFFFFFFFF00F
0000FFFFFFFFFFFFFFFF000F0000FFFFFFFFF00FFFFF00F00000FFFFFFFFF0FF
FF0000FF0000FFFFFFFFFF0F0000FF0F0000FFFFFFFFF00F00FF0FF00000FFFF
FFFFF0FFFF0FF0FF0000
}
OnClick = boutonmscoreClick
ShowHint = True
ParentShowHint = False
end
object boutonmscere: TSpeedButton
Left = 179
Height = 25
Hint = 'Ajouter un miroir sphérique convexe réel'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFF0F
FFFFFFFF0000FFFFFFFFFF0F00FFFFFF0000FFFFFFFFFF0F0000FFFF0000FFFF
FFFFF000FF000FFF0000FFFFFFFFFF0FF0FF0FFF0000FFFFFFFFFFFF0FFF00FF
0000FFFFFFFFFFFFFFF0F00F0000FFFFFFFFFFFFFF0FF00F0000FFFFFFFFFFFF
FFFF0F0F0000F00F0000F00F0000FF000000FF00FFFFFFFFFFF0FF000000F0FF
FFFFFFFFFFFF0F000000F0FFFFFFFFFFFF0FF00F0000FF00FFFFFFFFFFF0F00F
0000FFFFFFFFFFFF0FFF000F0000FFFFFFFFF00FF0FF00FF0000FFFFFFFFF0F0
FF0000FF0000FFFFFFFFFF0F0000FFFF0000FFFFFFFFF00F00FFFFFF0000FFFF
FFFFF0FFFFFFFFFF0000
}
OnClick = boutonmscereClick
ShowHint = True
ParentShowHint = False
end
object boutonconiqueconcave: TSpeedButton
Left = 204
Height = 25
Hint = 'Ajouter un miroir parabolique (ou elliptique, hyperbolique) concave'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFF0FFFF
FFFFFFFF0000FF0FFF0FFF0FFFFFFFFF0000FF0F00FFF0FFFFFFFFFF0000F00F
00000FFFF0FFFFFF0000FF0FFF00000F0FFFFFFF0000FFFFFFFF0000FFF0FFFF
0000FFFFFFFFF0000F0FFFFF0000FFFFFFFFFFF000FFFFFF0000FFFFFF0FFFFF
00FFF0000000FFFFFF0FFFFFF00FFFF00000FFFFFF000FFFFF0FF00F0000FFFF
FF0FFFFFFF000FFF0000FFFFFF000FFFFF00F00F0000FFFFFFFFFFFFFF00FFFF
0000FFFFFFFFFFFFF00F0FFF0000F00FFFFFFFF0000FF0FF0000F0FFFFFF0000
00FFFFFF0000FF0FF0000000FF0FFFFF0000F00F0000FFF0FFF0FFFF0000F0FF
FFFF0FFF0FFFFFFF0000
}
OnClick = boutonconiqueconcaveClick
ShowHint = True
ParentShowHint = False
end
object boutonconiqueconvexe: TSpeedButton
Left = 229
Height = 25
Hint = 'Ajouter un miroir parabolique (ou elliptique, hyperbolique) convexe'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFFFFFFF
FFFFFFFF0000FF0FFFFFFFFFFFFFFFFF0000FF0F00FFFFFFFFFFFFFF0000F00F
00000FFFFFFFFFFF0000FF0FFF00000FFFFFFFFF0000FFFFF0FF0000FFFFFFFF
0000FFFF0FF0F0000FFFFFFF0000FFFFFFFFFF0000FFFFFF0000FFFFFF0FF0FF
00FFF0000000FFFFFF0FFFF0F00FFFF00000FFFFFF000F0FFF0FF00F0000FFFF
FF0FFFFFFF000FFF0000FFFFFF000FF0FF00F00F0000FFFFFFFFFFFF0F00FFFF
0000FFFFFFF0FF0FF00FFFFF0000F00FF0FF0FF0000FFFFF0000F0FFFF0F0000
00FFFFFF0000FF0FF000000FFFFFFFFF0000F00F0000FFFFFFFFFFFF0000F0FF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutonconiqueconvexeClick
ShowHint = True
ParentShowHint = False
end
object ToolButton2: TToolButton
Left = 254
Height = 25
Top = 2
Caption = 'ToolButton2'
ImageIndex = 3
Style = tbsSeparator
end
object StaticText5: TLabel
Left = 262
Height = 20
Top = 2
Width = 47
Caption = 'Ecrans:'
Font.Color = clPurple
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object boutonecran: TSpeedButton
Left = 309
Height = 25
Hint = 'Ajouter un écran'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF0FFFF
FFFFFFFF0000FFFFFFF0FFFFFFFFFFFF0000FFFFFFF0FFFFFFFFFFFF0000F00F
FF00FFFFFFFFFFFF0000F000FFF0FFFFFFFFFFFF0000FF000FFFFFFFFFFFFFFF
0000FFF000FFFFFFFFFFFFFF0000FFFF000FFFFFFFFFFFFF0000FFFFF000FFFF
FFFFFFFF0000FFFFFF000FFFFFFFFFFF0000FFFFFFF000FFFFFFFFFF0000FFFF
FFFF000FFFFF00FF0000FFFFFFFFF000FFFF0FFF0000FFFFFFFFFF000FFFF0FF
0000FFFFFFFFFFF000FF00FF0000FFFFFFFFFFFF000F0FFF0000FFFFFFFFFFFF
F000FFFF0000FFFFFFFFFFFFFF000FFF0000FFFFFFFFFFFFFFF00FFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutonecranClick
ShowHint = True
ParentShowHint = False
end
object boutondia: TSpeedButton
Left = 334
Height = 25
Hint = 'Ajouter un diaphragme à iris'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF00000
0FFFFFFF0000FFFFF00FFFFFF00FFFFF0000FFF000FFFFFFFFF00FFF0000FF0F
FF000FFFFFF0F0FF0000FF0FFFFF0FFFFFF0F0FF0000F0FFFFFFF0FFFFF0FF0F
0000F0FFFFFF0000FFFF0F0F00000FFFFFF0FFFF0FFF0FF000000FFFFF0FFFFF
F0FF0FF000000FFFF00FFFFFF0F0FFF000000FFF0F0FFFFFF00FFFF000000FF0
FF0FFFFFF0FFFFF000000FF0FFF0FFFF0FFFFFF00000F0F0FFFF0000FFFFFF0F
0000F0FF0FFFF0FFFFFFFF0F0000FF0F0FFFFF0FFFFFF0FF0000FF0F0FFFFFF0
00FFF0FF0000FFF00FFFFFFFFF000FFF0000FFFFF00FFFFFF00FFFFF0000FFFF
FFF000000FFFFFFF0000
}
OnClick = boutondiaClick
ShowHint = True
ParentShowHint = False
end
object ToolButton6: TToolButton
Left = 359
Height = 25
Top = 2
Caption = 'ToolButton6'
ImageIndex = 4
Style = tbsSeparator
end
object StaticText3: TLabel
Left = 367
Height = 20
Top = 2
Width = 57
Caption = 'Sources:'
Font.Color = clRed
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object boutonrayon: TSpeedButton
Left = 424
Height = 25
Hint = 'Ajouter un rayon'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFFFFFFF
FFF0000F0000FF0FFFFFFFFFFFF0FFFF0000FF0FFFFFFFFFFFFF0FFF0000FF0F
FFFFFFFFFFFFF0FF0000FF0FFFFFFFFFFFFFFF0F00000F0FFFFFFFFFFFFFFF0F
0000F00FFFFFFFFFFFF0FF0F0000FF0FFFFFFFFFFFFF00FF0000FFFFFFFFFFFF
FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFF0FFFFFFFFFFFF0000FFFFFFFF0FFFFFFFFFFF0000FFFFFFFFF0FFFFFFFFFF
0000000000000000000000000000000000000000000000000000FFFFFFFFF0FF
FFFFFFFF0000FFFFFFFF0FFFFFFFFFFF0000FFFFFFF0FFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutonrayonClick
ShowHint = True
ParentShowHint = False
end
object boutonsourceponctuelle: TSpeedButton
Left = 449
Height = 25
Hint = 'Ajouter un objet ponctuel réel'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
F00FFF0F0000FFFFFFFFFFFF000FFF0F0000FFFFFFFF000000FFFF0F0000FFFF
FFFFFF000FFFF00F0000FFFFFFFFF0000FFFFF0F0000FFFFFFFF000F0FFFFFFF
0000FFFFFFF000FF0FFFFFFF0000FFFFFF000FFFFFFFFFFF0000F000F000FFFF
0FFFFFFF00000FF0F00FFFFFFFFFFFFF0000F00FF00FFFFFFFFFFFFF00000FF0
F00FFFFFFFFFFFFF0000000FF000FFFFFFFFFFFF0000FFFFFF000FFFFFFFFFFF
0000FFFFFFF0000FF0FFFFFF0000FFFFFFFF0000F0FF00FF0000FFFFFFFFFF00
00FF0FFF0000FFFFFFFFFFF000FFF0FF0000FFFFFFFFF000000F00FF0000FFFF
FFFFFFFFF00F0FFF0000
}
OnClick = boutonsourceponctuelleClick
ShowHint = True
ParentShowHint = False
end
object boutonspv: TSpeedButton
Left = 474
Height = 25
Hint = 'Ajouter un objet ponctuel virtuel'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF00FFFFFF
FFFFFFFF0000FFFF0FFFFFFFFFFFFF000000FFFFF0FFFFFFFFFFF00F00000FFF
00FFFFFFFFFF00FF0000000F0FFFFFFFFFF00FFF0000F0000FFFFFFF0000FFFF
0000FFF0000FFFFFF000FFFF0000FFFFF0000FFF00F0FFFF0000FFFFFFF000F0
0FF0FFFF0000FFFFFFFFF000FFFFFFFF0000FFFFFFFFF00000FFF0FF0000FF0F
FFFF00FFF000F0FF0000FF0FFFF00FFFFFF000FF0000FF0FFF00FF000FFFF000
0000F00FF00FF0FF0F0000FF0000FF0F00FFFF00FFFFFFFF0000FFF00FFFF0FF
0FFFFFFF0000FF00FFFFF000FFFFFFFF0000F00FFFFFFFFFFFFFFFFF000000FF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutonspvClick
ShowHint = True
ParentShowHint = False
end
object boutonondeplane: TSpeedButton
Left = 499
Height = 25
Hint = 'Ajouter une onde plane'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFF00F0000FFFFFFFFFFFFFFFFF0F00000FF0FFFFFF0FFFFFFF0F00000FF0F
FFFFFF0FFFFFF0F00000FF0FFFFFFFF0FFFFF00F0000F00F0000000000000000
0000FF0F00000000000000000000FFFFFFFFFFF0FFFFFFFF0000FFFFFFFFFF0F
FFFFFFFF0000FFFFFFFFF0FFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000FFFFFFFF0FFFFFFFFFFF000000FFFFFFF0FFFFFFFFFF
00000FFFFFFFFF0FFFFFFFFF0000F0FF0000000000000000000000FF00000000
0000000000000FFFFFFFFF0FFFFFFFFF0000FFFFFFFFF0FFFFFFFFFF0000FFFF
FFFF0FFFFFFFFFFF0000
}
OnClick = boutonondeplaneClick
ShowHint = True
ParentShowHint = False
end
object ToolButton4: TToolButton
Left = 524
Height = 25
Top = 2
Caption = 'ToolButton4'
ImageIndex = 0
Style = tbsSeparator
end
object StaticText4: TLabel
Left = 532
Height = 20
Top = 2
Width = 62
Caption = 'Dioptres:'
Font.Color = clGreen
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object boutonlmc: TSpeedButton
Left = 594
Height = 25
Hint = 'Ajouter une lentille mince convergente paraxiale'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFF00FF
FFF0FFFF0000FFFFFFF0000FFFF0FFFF0000FFFFFF0F00F0FFF0FFFF0000FFFF
F0FF00FF0F00FFFF0000FFFFFFFF00FFFFF0FFFF0000FFFFFFFF00FFFFFFFFFF
0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FF
FFFFFFFF0000000F00FF00FF000F00F00000FFFFFFFF00FFFFFFFFFF00000FFF
FFFF00FFFFFFF0FF00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF000
00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF0000000FFFFF0FF00FF
000FFFFF0000FFFFFF0F00F0F0FFFFFF0000FFFFFFF0000FFF0FFFFF0000FFFF
FFFF00FFF00FFFFF0000
}
OnClick = boutonlmcClick
ShowHint = True
ParentShowHint = False
end
object boutonlmd: TSpeedButton
Left = 619
Height = 25
Hint = 'Ajouter une lentille mince divergente paraxiale'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
0FF0FFFF0000FFFFFF0FFFF0FFF0FFFF0000FFFFFFF0FF0FFFF0FFFF0000FFFF
FFFF00FFFF00FFFF0000FFFFFFFF00FFFFF0FFFF0000FFFFFFFF00FFFFFFFFFF
0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FF
FFFFFFFF0000000F00FF00FF000F00F00000FFFFFFFF00FFFFFFFFFF00000FFF
FFFF00FFFFFFF0FF00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF000
00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF0000000FFFFFFFF00FF
F00FFFFF0000FFFFFFF0FF0FF0FFFFFF0000FFFFFF0FFFF0FF0FFFFF0000FFFF
F0FFFFFF000FFFFF0000
}
OnClick = boutonlmdClick
ShowHint = True
ParentShowHint = False
end
object boutonlec: TSpeedButton
Left = 652
Height = 25
Hint = 'Ajouter une lentille épaisse'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFF0FFFF0000FFFFFFF0000FFFF0FFFF0000FFFFFF00FF00FFF0FFFF0000FFFF
F00FFFF000F0FFFF0000FFFF00FFFFFF0F00FFFF0000FFFF00FFFFFF00F0FFFF
0000FFFF00FFFFFF00FFFFFF0000FFF00FFFFFFFF00FFFFF0000FFF00FFFFFFF
F00FFFFF0000FFF00FFFFFFFF00FFFFF000000000F00F000F0000F000000FFF0
0FFFFFFFF00FFFFF0000FFF00FFFFFFFF00FFFFF0000FFF00FFFFFFFF0FFFFFF
0000FFFF00FFFFFF00000FFF0000FFFF00FFFFFF00F0FFFF0000FFFF00FFFFFF
00F0FFFF0000FFFFF00FFFF00FFF0FFF0000FFFFFF00FF00FF000FFF0000FFFF
FFF0000FFFFFFFFF0000
}
OnClick = boutonlecClick
ShowHint = True
ParentShowHint = False
end
object boutonpoly: TSpeedButton
Left = 677
Height = 25
Hint = 'Ajouter un polygône réfractant'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF00FFFFF
FFFFF0FF0000FFFFF0FFFFFFFFFFFF0F0000FFFFFF0FF0000FFFF0FF0000FFFF
F00F0000000FFF0F0000FF0FF0F000FF000000FF0000FF0FFF000FFFFF000FFF
0000FF0FF000FFFFFFF00FFF0000F00FF00FFFFFFFF00FFF0000FF0F00FFFFFF
FFF00FFF0000FFF000FFFFFFFFF00FFF0000FF000FFFFFFFFFF00FFF0000F000
FFFFFFFFFFF00FFF0000F00FFFFFFFFFFFF00FFF0000F000FFFFFFFFFFF00FFF
0000FF000FFFFFFFFFF00FFF0000F0F000FFFFFFFFF00FFF0000FF0F000FFFFF
FFF00FF00000F0FFF0000000000000000000F0FFFF000000000000F00000F00F
FFFFFFFFFFFFFF000000
}
OnClick = boutonpolyClick
ShowHint = True
ParentShowHint = False
end
object boutonprisme: TSpeedButton
Left = 702
Height = 25
Hint = 'Ajouter un prisme isocéle'
Top = 2
Width = 25
Glyph.Data = {
76060000424D7606000000000000360000002800000014000000140000000100
2000000000004006000064000000640000000000000000000000000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00000000FF000000FFFFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FF000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
}
OnClick = boutonprismeClick
ShowHint = True
ParentShowHint = False
end
object boutonsphere: TSpeedButton
Left = 727
Height = 25
Hint = 'Ajouter une sphère réfractante'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0000000
000FFFFF0000FFFF000000000000FFFF0000FFF000FFFFFFFF000FFF0000FF00
0FFFFFFFFFF000FF0000F000FFFFFF00FFFF000F0000F00FFFFFF0FFFFFFF00F
000000FFFFFFF0FFFFFFFF00000000FFFFFFFF00FFFFFF00000000FFFFFFFFFF
FFFFFF00000000FFFFFFF00FFFFFFF00000000FFFFFFF00FFFFFFF00000000FF
FFFFFFFFFFFFFF00000000FFFFFFFFFFFFFFFF00000000FFFFFFFFFFFFFFFF00
0000F00FFFFFFFFFFFFFF00F0000F000FFFFFFFFFFFF000F0000FF000FFFFFFF
FFF000FF0000FFF000FFFFFFFF000FFF0000FFFF000000000000FFFF0000FFFF
F0000000000FFFFF0000
}
OnClick = boutonsphereClick
ShowHint = True
ParentShowHint = False
end
object boutonpolycercle: TSpeedButton
Left = 752
Height = 25
Hint = 'Ajouter une polycercle réfractant'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF000FFFFF
FFFF0FFF0000FFFF0FFFFFFFFFFF0FFF0000FFFFF0FFFFFFFFFF0FFF0000FFFF
FF0FFFFFFFF00FFF0000FFFF0F0F000FFFFF0FFF0000FFFF0000FFF00FFFFFFF
0000FFFF00FFFFFFF00FFFFF0000FFF0FFFFFFFFFFF0FFFF0000FF0FFFFFFFFF
FFFF0FFF0000FFF0FFFFFFFFFFFF0FFF0000F0FF0FFFFFFFFFFF0FFF00000F0F
F0FFFFFFFFFF0FFF0000FF0FF0FFFFFFFFFF0FFF0000F0FFF0FFFFFFFFFF0FFF
0000FF0FF0FFFFFFFFFF0FFF000000FF0FFFFFFFFFFF0FFF0000FFF0FFFFFFFF
FFFF0FFF0000FF0FFFFF00FFFFF0FFFF0000FFF0FFF0FF0FFF0FFFFF0000FFFF
000FFFF000FFFFFF0000
}
OnClick = boutonpolycercleClick
ShowHint = True
ParentShowHint = False
end
object ToolButton5: TToolButton
Left = 644
Height = 25
Top = 2
Caption = 'ToolButton5'
ImageIndex = 1
Style = tbsSeparator
end
end
object ToolBar2: TToolBar
Left = 0
Height = 29
Top = 33
Width = 1022
ButtonHeight = 25
ButtonWidth = 25
TabOrder = 2
object StaticText6: TLabel
Left = 1
Height = 20
Top = 2
Width = 47
Caption = 'Divers:'
Font.Color = clMaroon
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object boutondistance: TSpeedButton
Left = 48
Height = 25
Hint = 'Mesurer la distance entre deux points'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FF000FFF0FF00FF00F0F0000FF0F
F0FF0F0FF0F0FFFF0000FF0FFF0F0FFF0FF0FFFF0000FF0FFF0F0FF0FFF0FFFF
0000FF0FFF0F0F0FF0F0FFFF0000FF0FFF0F0F000F000FFF0000FF0FF0FFFFFF
FFF0FFFF0000FF000FFF0FFFFFF0FFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF00000000000000000000000000000FF0FF0FF0FF0FF0FFF0
00000FF0FF0FF0FF0FF0FFF000000FFFFF0FFFFF0FFFFFF000000FFFFFFFFFFF
FFFFFFF000000FFFFFFFFFFFFFFFFFF00000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutondistanceClick
ShowHint = True
ParentShowHint = False
end
object boutonangle: TSpeedButton
Left = 73
Height = 25
Hint = 'Mesurer un angle'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFF0000FFFFFFFFFFFFFF000F000000FFFFFFFFFFFFF00F00000000FFFF
FFFFFFFFF00FF00F0000FF00FFFFFFFFF00FF00F0000FF0F00FFFFFFF00F0000
0000FF0FFF00FFFFFF000F000000FFF0FFF000FFFFFFFFFF0000FFF0FFF0FF00
0FFFFFFF0000FFF0FF0FFFFFF00FFFFF0000FFF000FFFFFFFFF00FFF0000FFF0
FFFFFFFFFFFFF00F0000FFFF0FFFFFFFFFFFFFFF0000FFFF0FFFFFFFFFFFFFFF
0000FFFF0FFFFFFFFFFFFFFF0000FFFF0FFFFFFFFFFFFFFF0000FFFF0FFFFFFF
FFFFFFFF0000FFFFF0FFFFFFFFFFFFFF0000FFFFF0FFFFFFFFFFFFFF0000FFFF
F0FFFFFFFFFFFFFF0000
}
OnClick = boutonangleClick
ShowHint = True
ParentShowHint = False
end
object boutontexte: TSpeedButton
Left = 98
Height = 25
Hint = 'Ajouter un texte sur le dessin'
Top = 2
Width = 25
Caption = 'A'
OnClick = boutontexteClick
ShowHint = True
ParentShowHint = False
end
object boutonfleche: TSpeedButton
Left = 123
Height = 25
Hint = 'Ajouter un trait, une fléche...'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFF0000FFF0FFFFFFFFFFFFFFFF0000FF0FFFFFFFFFFFFFFFFF0000F000
FFFFFFFFFFFFFFFF0000F0000FFFFFFFFFFFFFFF00000F0000FFFFFFFFFFFFFF
0000FFF0000FFFFFFFFFFFFF0000FFFF0000FFFFFFFFFFFF0000FFFFF0000FFF
FFFFFFFF0000FFFFFF0000FFFFFFFFFF0000FFFFFFF0000FFFFFFFFF0000FFFF
FFFF0000FFF0FFFF0000FFFFFFFFF0000FF0FFFF0000FFFFFFFFFF0000F0FFFF
0000FFFFFFFFFFF00000FFFF0000FFFFFFFFFFFF0000FFFF0000FFFFFFFFFFFF
F000FFFF0000FFFFFFFFFF000000FFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutonflecheClick
ShowHint = True
ParentShowHint = False
end
object boutonfantome: TSpeedButton
Left = 148
Height = 25
Hint = 'Cacher des segments de rayon'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFEEEEE
EEEFFFFF0000FFFFFFFEEEEEEEEFFFFF0000FFFFFFFEEEEEEEEFFFFF0000FFFF
FFFEEEEEEEEFFFFF0000FFFFFFFEEEEEEEEFFFFF0000FFFFFFFEEEEEEEEFFFFF
0000FEEEEEFEEEEEEEEEEEEE0000FEEEEEEEEEEEEEEEEEEE0000FFFFEEEEE000
0EEEEFFF0000FFFFFFEE0EEEE0EFFFFF0000FFFFFFEEEEEEEEEFFFFF0000FFFF
FFEEEEEEEEEFFFFF0000FFFFFEEEEEEEEEEEFFFF0000FFFFFEEEEEEEEEEEFFFF
0000FFFFFE00EEEEE00EFFFF0000FFFFFE00EEEEE00EFFFF0000FFFFFFEEEEEE
EEEFFFFF0000FFFFFFFEEEEEEEFFFFFF0000FFFFFFFFEEEEEFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = boutonfantomeClick
ShowHint = True
ParentShowHint = False
end
object SpeedButton1: TSpeedButton
Left = 173
Height = 25
Hint = 'Ajouter (ou éditer) le commentaire de la simulation'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
00000000000000000000000000000000000000FFFFFFFFFFFFFFFF00000000FF
00000FFFFFFFFF00000000FFFFFFFFFFFFFFFF00000000FF000000000000FF00
000000FFFFFFFFFFFFFFFF00000000FF000000FFFFFFFF00000000FFFFFFFFFF
FFFFFF00000000FF000000000000FF00000000FFFFFFFFFFFFFFFF00000000FF
000000000000FF00000000FFFFFFFFFFFFFFFF00000000FF000000000FFFFF00
000000FFFFFFFFFFFFFFFF00000000FF000000000000FF00000000FFFFFFFFFF
FFFFFF00000000FFFFFFFFFFFFFFFF0000000000000000000000000000000000
00000000000000000000
}
OnClick = SpeedButton1Click
ShowHint = True
ParentShowHint = False
end
object boutonoeil: TSpeedButton
Left = 198
Height = 25
Hint = 'Ajouter un oeil stylisé'
Top = 2
Width = 25
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FF0FFFFF0000FFFFFFFFFFFFF0FFFFFF0000FFFFFFFFFFFF0FFFFFFF0000FFFF
FFFFFFF0FFFFFFFF0000FFFFFFFFFF0F0FFFFFFF0000FFFFFFFFF0FFF0FFFFFF
0000FFFFFFF00FFFFF0FFFFF0000FFFFF00FFFFFFF0FFFFF0000FFF00FFFFFFF
FFF0FFFF0000000FFFFFFFFFF000FFFF0000000FFFFFFFFFF000FFFF0000FFF0
0FFFFFFFFFF0FFFF0000FFFFF00FFFFFFF0FFFFF0000FFFFFFF00FFFFF0FFFFF
0000FFFFFFFFF0FFF0FFFFFF0000FFFFFFFFFF0F0FFFFFFF0000FFFFFFFFFFF0
FFFFFFFF0000FFFFFFFFFFFF0FFFFFFF0000FFFFFFFFFFFFF0FFFFFF0000FFFF
FFFFFFFFFF0FFFFF0000
}
OnClick = boutonoeilClick
ShowHint = True
ParentShowHint = False
end
object StaticText7: TLabel
Left = 256
Height = 20
Top = 2
Width = 59
Caption = 'Afficher:'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object ToolButton1: TToolButton
Left = 248
Height = 25
Top = 2
Caption = 'ToolButton1'
ImageIndex = 0
Style = tbsSeparator
end
object ToolButton9: TToolButton
Left = 788
Height = 25
Top = 2
Caption = 'ToolButton9'
ImageIndex = 1
Style = tbsSeparator
end
object StaticText1: TLabel
Left = 796
Height = 20
Top = 2
Width = 42
Caption = 'Zoom:'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object SpeedButton2: TSpeedButton
Left = 736
Height = 25
Hint = 'Afficher les coordonnées des segments'
Top = 2
Width = 52
Caption = 'Coord.'
OnClick = SpeedButton2Click
ShowHint = True
ParentFont = False
ParentShowHint = False
end
object cochenormale: TCheckBox
Left = 315
Height = 24
Top = 2
Width = 88
Caption = 'Normales'
Checked = True
OnClick = cochenormaleClick
ParentFont = False
State = cbChecked
TabOrder = 0
end
object cocheangles: TCheckBox
Left = 403
Height = 24
Top = 2
Width = 185
Caption = 'Angles d''incid. et de réfr.'
OnChange = cocheanglesChange
OnClick = cocheanglesClick
ParentFont = False
TabOrder = 1
end
object cochegrille: TCheckBox
Left = 588
Height = 24
Top = 2
Width = 60
Caption = 'Grille'
OnClick = cochegrilleClick
ParentFont = False
TabOrder = 2
end
object cocheattraction: TCheckBox
Left = 648
Height = 24
Top = 2
Width = 88
Caption = 'Attraction'
OnClick = cocheattractionClick
ParentFont = False
TabOrder = 3
end
object ComboZoom: TComboBox
Left = 838
Height = 36
Hint = 'Facteur de zoom'
Top = 2
Width = 79
ItemHeight = 0
Items.Strings = (
'x1'
'x2'
'x5'
'x10'
'x20'
'x50'
'x100'
)
OnChange = ComboZoomChange
ParentFont = False
ParentShowHint = False
ShowHint = True
Style = csDropDownList
TabOrder = 4
end
object boutonreseau: TSpeedButton
Left = 223
Height = 25
Top = 2
Width = 25
Glyph.Data = {
26050000424D2605000000000000760000002800000014000000140000000100
180000000000B0040000120B0000120B00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF000000FFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
00000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
000000000000FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFF000000000000FF
FFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
00000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF
FFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF0000
00000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF00
0000000000000000FFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000
00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF00
0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000000000
00FFFFFFFFFFFFFFFFFF
}
OnClick = boutonreseauClick
ShowHint = True
ParentShowHint = False
end
end
object ScrollBox1: TScrollBox
Left = 0
Height = 324
Top = 62
Width = 1022
HorzScrollBar.Page = 798
HorzScrollBar.Range = 801
HorzScrollBar.Visible = False
VertScrollBar.Page = 301
VertScrollBar.Range = 320
VertScrollBar.Visible = False
Align = alClient
AutoScroll = False
ClientHeight = 322
ClientWidth = 1020
TabOrder = 3
object Image1: TImage
Left = 0
Height = 320
Top = 0
Width = 1017
OnMouseDown = Image1MouseDown
OnMouseMove = Image1MouseMove
end
end
object MainMenu1: TMainMenu
left = 384
top = 160
object Fichier1: TMenuItem
Caption = 'Fichier'
object Nouveau1: TMenuItem
Caption = 'Nouvelle simulation'
OnClick = Nouveau1Click
end
object Ouvrirsimulation1: TMenuItem
Caption = 'Ouvrir simulation'
object durpertoireexemples1: TMenuItem
Caption = 'de mon répertoire personnel'
OnClick = durpertoireexemples1Click
end
object durpertoireexemples2: TMenuItem
Caption = 'du répertoire "exemples"'
OnClick = durpertoireexemples2Click
end
object dudernierrpertoireutilis1: TMenuItem
Caption = 'du dernier répertoire de chargement autre que ceux ci-dessus'
OnClick = dudernierrpertoireutilis1Click
end
end
object MenuItem9: TMenuItem
Caption = 'Superposer simulation'
object MenuItem10: TMenuItem
Caption = 'de mon répertoire personnel'
OnClick = MenuItem10Click
end
object MenuItem11: TMenuItem
Caption = 'du répertoire "exemples"'
OnClick = MenuItem11Click
end
object MenuItem12: TMenuItem
Caption = 'du dernier répertoire de chargement autre que ceux ci-dessus'
OnClick = MenuItem12Click
end
end
object Enregistrersimulation1: TMenuItem
Caption = 'Enregistrer simulation sous'
OnClick = Enregistrersimulation1Click
end
object Enregistrersimulation2: TMenuItem
Caption = 'Enregistrer simulation'
OnClick = Enregistrersimulation2Click
end
object N15: TMenuItem
Caption = '-'
end
object Modifierdimensionsespacedetravail1: TMenuItem
Caption = 'Modifier les dimensions de l''espace de travail'
object Ajusterautomatiquement1: TMenuItem
Caption = 'Ajuster automatiquement à la plus petite taille'
OnClick = Ajusterautomatiquement1Click
end
object Manuellement1: TMenuItem
Caption = 'Manuellement'
OnClick = Manuellement1Click
end
end
object N3: TMenuItem
Caption = '-'
end
object Prfrences1: TMenuItem
Caption = 'Préférences'
OnClick = Prfrences1Click
end
object N17: TMenuItem
Caption = '-'
end
object Imprimer1: TMenuItem
Caption = 'Imprimer'
OnClick = Imprimer1Click
end
object N4: TMenuItem
Caption = '-'
end
object MenuItem1: TMenuItem
Caption = 'Exporter graphe'
object MenuItem3: TMenuItem
Caption = 'PNG'
OnClick = MenuItem3Click
end
object MenuItem4: TMenuItem
Caption = 'JPG'
OnClick = MenuItem4Click
end
object MenuItem8: TMenuItem
Caption = 'PS'
OnClick = MenuItem8Click
end
end
object MenuItem2: TMenuItem
Caption = '-'
end
object Quitter1: TMenuItem
Caption = 'Quitter'
OnClick = Quitter1Click
end
end
object Edition1: TMenuItem
Caption = 'Edition'
object Rtablir1: TMenuItem
Caption = 'Annuler'
Enabled = False
ShortCut = 16474
OnClick = Rtablir1Click
end
object Refaire1: TMenuItem
Caption = 'Refaire'
Enabled = False
ShortCut = 16466
OnClick = Refaire1Click
end
object N19: TMenuItem
Caption = '-'
end
object Dupliquerunlment1: TMenuItem
Caption = 'Dupliquer un élément'
OnClick = Dupliquerunlment1Click
end
object Supprimerunlment1: TMenuItem
Caption = 'Supprimer un élément'
OnClick = Supprimerunlment1Click
end
object Propritsdunlment1: TMenuItem
Caption = 'Propriétés d''un élément'
OnClick = Propritsdunlment1Click
end
object Dplacerunlment1: TMenuItem
Caption = 'Déplacer un élément'
OnClick = Dplacerunlment1Click
end
object Grouperdeslments1: TMenuItem
Caption = 'Grouper des éléments'
object Tousleslments1: TMenuItem
Caption = 'Tous les éléments'
OnClick = Tousleslments1Click
end
object Elementschoisir2: TMenuItem
Caption = 'Eléments à choisir'
OnClick = Elementschoisir2Click
end
end
object N6: TMenuItem
Caption = '-'
end
object Copier1: TMenuItem
Caption = 'Copier simulation dans le presse papier'
ShortCut = 16451
OnClick = Copier1Click
end
object N12: TMenuItem
Caption = '-'
end
object Editerlecommentairedelasimulation1: TMenuItem
Caption = 'Editer le commentaire de la simulation'
OnClick = Editerlecommentairedelasimulation1Click
end
end
object Ajouter1: TMenuItem
Caption = 'Ajouter'
object Systmeoptique1: TMenuItem
Caption = 'Système optique idéal'
object Miroirplan2: TMenuItem
Caption = 'Miroir plan'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFFFFFFF
FFFFFFFF0000FF0FFFFFFFFFFFFFFFFF0000FF0FFFFFFFFFFFFFFFFF00000F0F
FFFFFFFFFFFFFFFF0000F00FFFFFFFFFFFFFFFFF0000FF0FF0FFFFFFFFFFFFFF
000000FFF0FFFFFFFFFFFFFF0000000FF0F0FFFFFFFFFFFF0000000000F0FFFF
FFFF00000000F00000F0F0FFFFFF0FFF0000FFF00000F0FFFFFFF0FF0000FFFF
0000F0F0FFFFFF0F0000FFFFF00000F0FFFFFFF00000FFFFFF000000F0FFFFF0
0000FFFFFFFF0000F0FF0FF00000FFFFFFFFF00000F0F00F0000FFFFFFFFFF00
00F0FFFF0000FFFFFFFFFFF00000FFFF0000FFFFFFFFFFFF00000FFF0000FFFF
FFFFFFFFFF000FFF0000
}
OnClick = Miroirplan2Click
end
object Miroirsphriqueconvergent1: TMenuItem
Caption = 'Miroir sphérique concave'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF0F00F
FFFFFFFF0000FFFFFFF0F000FFFFFF0F0000FFFFFFF0FF0000FFF0FF0000FFFF
FF00FFF0000F0FFF0000FFFFFFF0FFFFF000FF0F0000FFFFFFFFFFFFF00FF0FF
0000FFFFFFFFFFFFF00F0FFF0000F0FFFFFFFFFFF000FF0F0000F0FFFFFFFFFF
F00FF0FF0000F0FF00F00F00F00F0FFF0000F000FFFFFFFFF000FF0F0000F0FF
FFFFFFFFF00FF0FF0000F000FFFFFFFFF00F0FFF0000FFFFFFFFFFFFF000FF0F
0000FFFFFFFFFFFFF00FF0FF0000FFFFF00FFFFFF00F0FFF0000FFFFF0FFFFF0
0000FFFF0000FFFFFF0FFF0000FFFFFF0000FFFFF00FF000FFFFFFFF0000FFFF
F0FFF00FFFFFFFFF0000
}
OnClick = Miroirsphriqueconvergent1Click
end
object Miroirsphriqueconvexe1: TMenuItem
Caption = 'Miroir sphérique convexe'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFF00FFF0FFF
FFFFFFFF0000FF000FFF0FFFFFFFFFFF0000F000FFFF0FFFFFFFFFFF0000000F
FFF00FFFFFFFFFFF000000FF0FFF0FFFFFFFFFFF000000F0FFFFFFFFFFFFFFFF
0000000FFFFFFFFFFFFFFFFF000000FF0FFFFFFFFFFFFFFF000000F0FFFFFFFF
FFFFFFFF00000000000F00F0000F00FF000000FF0FFFFFFFFFF0FFFF000000F0
FFFFFFFFFFF0FFFF0000000FFFFFFFFFFFF000FF000000FF0FFFFFFFFFF0FFFF
000000F0FFFFFFFFFFF000FF0000000FFF00FFFFFFFFFFFF0000000FFF0FFFFF
FFFFFFFF0000F000FFF0FFFFFFFFFFFF0000FF000F00FFFFFFFFFFFF0000FFF0
0F0FFFFFFFFFFFFF0000
}
OnClick = Miroirsphriqueconvexe1Click
end
object N1: TMenuItem
Caption = '-'
end
object Lentilleminceconvergente1: TMenuItem
Caption = 'Lentille mince convergente'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFF00FF
FFF0FFFF0000FFFFFFF0000FFFF0FFFF0000FFFFFF0F00F0FFF0FFFF0000FFFF
F0FF00FF0F00FFFF0000FFFFFFFF00FFFFF0FFFF0000FFFFFFFF00FFFFFFFFFF
0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FF
FFFFFFFF0000000F00FF00FF000F00F00000FFFFFFFF00FFFFFFFFFF00000FFF
FFFF00FFFFFFF0FF00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF000
00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF0000000FFFFF0FF00FF
000FFFFF0000FFFFFF0F00F0F0FFFFFF0000FFFFFFF0000FFF0FFFFF0000FFFF
FFFF00FFF00FFFFF0000
}
OnClick = Lentilleminceconvergente1Click
end
object Lentillemincedivergente1: TMenuItem
Caption = 'Lentille mince divergente'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0FFFFFF
0FF0FFFF0000FFFFFF0FFFF0FFF0FFFF0000FFFFFFF0FF0FFFF0FFFF0000FFFF
FFFF00FFFF00FFFF0000FFFFFFFF00FFFFF0FFFF0000FFFFFFFF00FFFFFFFFFF
0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FFFFFFFFFF0000FFFFFFFF00FF
FFFFFFFF0000000F00FF00FF000F00F00000FFFFFFFF00FFFFFFFFFF00000FFF
FFFF00FFFFFFF0FF00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF000
00000FFFFFFF00FFFFFFF0FF0000000FFFFF00FFFFFFF0000000FFFFFFFF00FF
F00FFFFF0000FFFFFFF0FF0FF0FFFFFF0000FFFFFF0FFFF0FF0FFFFF0000FFFF
F0FFFFFF000FFFFF0000
}
OnClick = Lentillemincedivergente1Click
end
object Lamesemirflchissante1: TMenuItem
Caption = 'Lame semi réfléchissante'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFF0FFF
FFFFFFFF0000FF00FFFF0FFFFFFFFFFF0000FF000FFF0FFFFFFFFFFF0000FFF0
00F00FFFFFFFFFFF0000FFFF000F0FFFFFFFFFFF0000FFFFF000FFFFFFFFFFFF
0000FFFFFF000FFFFFFFFFFF0000FFFFFFF000FFFFFFFFFF0000FFFFFFFF000F
FFFFFFFF0000FFFFFFFFF000FFFFFFFF000000F00F00F0000F00F00F0000FFFF
FFFFFFF000FFFFFF0000FFFFFFFFF0FF000FFFFF0000FFFFFFFFF0FFF000FFFF
0000FFFFFFFFFFFFFF000FFF0000FFFFFFFFF0FFFFF000FF0000FFFFFFFFF0FF
FF00000F0000FFFFFFFFFFFFFF0FF00F0000FFFFFFFFF0FFFFF0FFFF0000FFFF
FFFFF0FFFF00FFFF0000
}
OnClick = Lamesemirflchissante1Click
end
object N2: TMenuItem
Caption = '-'
end
object Ecran1: TMenuItem
Caption = 'Ecran'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF0FFFF
FFFFFFFF0000FFFFFFF0FFFFFFFFFFFF0000FFFFFFF0FFFFFFFFFFFF0000F00F
FF00FFFFFFFFFFFF0000F000FFF0FFFFFFFFFFFF0000FF000FFFFFFFFFFFFFFF
0000FFF000FFFFFFFFFFFFFF0000FFFF000FFFFFFFFFFFFF0000FFFFF000FFFF
FFFFFFFF0000FFFFFF000FFFFFFFFFFF0000FFFFFFF000FFFFFFFFFF0000FFFF
FFFF000FFFFF00FF0000FFFFFFFFF000FFFF0FFF0000FFFFFFFFFF000FFFF0FF
0000FFFFFFFFFFF000FF00FF0000FFFFFFFFFFFF000F0FFF0000FFFFFFFFFFFF
F000FFFF0000FFFFFFFFFFFFFF000FFF0000FFFFFFFFFFFFFFF00FFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = Ecran1Click
end
object Diaphragme1: TMenuItem
Caption = 'Diaphragme'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF00000
0FFFFFFF0000FFFFF00FFFFFF00FFFFF0000FFF000FFFFFFFFF00FFF0000FF0F
FF000FFFFFF0F0FF0000FF0FFFFF0FFFFFF0F0FF0000F0FFFFFFF0FFFFF0FF0F
0000F0FFFFFF0000FFFF0F0F00000FFFFFF0FFFF0FFF0FF000000FFFFF0FFFFF
F0FF0FF000000FFFF00FFFFFF0F0FFF000000FFF0F0FFFFFF00FFFF000000FF0
FF0FFFFFF0FFFFF000000FF0FFF0FFFF0FFFFFF00000F0F0FFFF0000FFFFFF0F
0000F0FF0FFFF0FFFFFFFF0F0000FF0F0FFFFF0FFFFFF0FF0000FF0F0FFFFFF0
00FFF0FF0000FFF00FFFFFFFFF000FFF0000FFFFF00FFFFFF00FFFFF0000FFFF
FFF000000FFFFFFF0000
}
OnClick = Diaphragme1Click
end
end
object Systmeoptiquerel1: TMenuItem
Caption = 'Système optique réel'
object Miroirsphriqueconcave1: TMenuItem
Caption = 'Miroir sphérique concave'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFF0F
F00FF0F00000FFFFFFFFFF0F00FF0F0F0000FFFFFFFFFF0F0000F0FF0000FFFF
FFFFF00FFF000FFF0000FFFFFFFFFF0FFFFF0FFF0000FFFFFFFFFFFFFFFF00F0
0000FFFFFFFFFFFFFFFFF00F0000FFFFFFFFFFFFFFFFF00F0000FFFFFFFFFFFF
FFFFFF0F0000F00F0000F00F0000FF000000FF00FFFFFFFFFFFFFF000000F0FF
FFFFFFFFFFFFFF000000F0FFFFFFFFFFFFFFF00F0000FF00FFFFFFFFFFFFF00F
0000FFFFFFFFFFFFFFFF000F0000FFFFFFFFF00FFFFF00F00000FFFFFFFFF0FF
FF0000FF0000FFFFFFFFFF0F0000FF0F0000FFFFFFFFF00F00FF0FF00000FFFF
FFFFF0FFFF0FF0FF0000
}
OnClick = Miroirsphriqueconcave1Click
end
object Miroirsphriqueconvexe2: TMenuItem
Caption = 'Miroir sphérique convexe'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFF0F
FFFFFFFF0000FFFFFFFFFF0F00FFFFFF0000FFFFFFFFFF0F0000FFFF0000FFFF
FFFFF000FF000FFF0000FFFFFFFFFF0FF0FF0FFF0000FFFFFFFFFFFF0FFF00FF
0000FFFFFFFFFFFFFFF0F00F0000FFFFFFFFFFFFFF0FF00F0000FFFFFFFFFFFF
FFFF0F0F0000F00F0000F00F0000FF000000FF00FFFFFFFFFFF0FF000000F0FF
FFFFFFFFFFFF0F000000F0FFFFFFFFFFFF0FF00F0000FF00FFFFFFFFFFF0F00F
0000FFFFFFFFFFFF0FFF000F0000FFFFFFFFF00FF0FF00FF0000FFFFFFFFF0F0
FF0000FF0000FFFFFFFFFF0F0000FFFF0000FFFFFFFFF00F00FFFFFF0000FFFF
FFFFF0FFFFFFFFFF0000
}
OnClick = Miroirsphriqueconvexe2Click
end
object Miroircnique1: TMenuItem
Caption = 'Miroir cônique'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFFFFFFF
FFFFFFFF0000FF0FFFFFFFFFFFFFFFFF0000FF0F00FFFFFFFFFFFFFF0000F00F
00000FFFFFFFFFFF0000FF0FFF00000FFFFFFFFF0000FFFFFFFF0000FFFFFFFF
0000FFFFFFFFF0000FFFFFFF0000FFFFFFFFFFF000FFFFFF0000FFFFFF0FFFFF
00FFF0000000FFFFFF0FFFFFF00FFFF00000FFFFFF000FFFFF0FF00F0000FFFF
FF0FFFFFFF000FFF0000FFFFFF000FFFFF00F00F0000FFFFFFFFFFFFFF00FFFF
0000FFFFFFFFFFFFF00FFFFF0000F00FFFFFFFF0000FFFFF0000F0FFFFFF0000
00FFFFFF0000FF0FF000000FFFFFFFFF0000F00F0000FFFFFFFFFFFF0000F0FF
FFFFFFFFFFFFFFFF0000
}
OnClick = Miroircnique1Click
end
object N5: TMenuItem
Caption = '-'
end
object Polyhdrerfractant1: TMenuItem
Caption = 'Polyhèdre réfractant'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF00FFFFF
FFFFF0FF0000FFFFF0FFFFFFFFFFFF0F0000FFFFFF0FF0000FFFF0FF0000FFFF
F00F0000000FFF0F0000FF0FF0F000FF000000FF0000FF0FFF000FFFFF000FFF
0000FF0FF000FFFFFFF00FFF0000F00FF00FFFFFFFF00FFF0000FF0F00FFFFFF
FFF00FFF0000FFF000FFFFFFFFF00FFF0000FF000FFFFFFFFFF00FFF0000F000
FFFFFFFFFFF00FFF0000F00FFFFFFFFFFFF00FFF0000F000FFFFFFFFFFF00FFF
0000FF000FFFFFFFFFF00FFF0000F0F000FFFFFFFFF00FFF0000FF0F000FFFFF
FFF00FF00000F0FFF0000000000000000000F0FFFF000000000000F00000F00F
FFFFFFFFFFFFFF000000
}
OnClick = Polyhdrerfractant1Click
end
object Sphrerfractante1: TMenuItem
Caption = 'Sphère réfractante'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFF0000000
000FFFFF0000FFFF000000000000FFFF0000FFF000FFFFFFFF000FFF0000FF00
0FFFFFFFFFF000FF0000F000FFFFFF00FFFF000F0000F00FFFFFF0FFFFFFF00F
000000FFFFFFF0FFFFFFFF00000000FFFFFFFF00FFFFFF00000000FFFFFFFFFF
FFFFFF00000000FFFFFFF00FFFFFFF00000000FFFFFFF00FFFFFFF00000000FF
FFFFFFFFFFFFFF00000000FFFFFFFFFFFFFFFF00000000FFFFFFFFFFFFFFFF00
0000F00FFFFFFFFFFFFFF00F0000F000FFFFFFFFFFFF000F0000FF000FFFFFFF
FFF000FF0000FFF000FFFFFFFF000FFF0000FFFF000000000000FFFF0000FFFF
F0000000000FFFFF0000
}
OnClick = Sphrerfractante1Click
end
object MenuPrisme: TMenuItem
Caption = 'Prisme'
Bitmap.Data = {
76060000424D7606000000000000360000002800000014000000140000000100
2000000000004006000064000000640000000000000000000000000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00000000FF000000FFFFFFFF00FFFFFF00000000FF000000FFFFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFF
FF00000000FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FF000000FF000000FFFFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
00FF000000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00000000FF000000FF000000FFFFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
}
OnClick = MenuPrismeClick
end
object Lentille1: TMenuItem
Caption = 'Lentille'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFF0FFFF0000FFFFFFF0000FFFF0FFFF0000FFFFFF00FF00FFF0FFFF0000FFFF
F00FFFF000F0FFFF0000FFFF00FFFFFF0F00FFFF0000FFFF00FFFFFF00F0FFFF
0000FFFF00FFFFFF00FFFFFF0000FFF00FFFFFFFF00FFFFF0000FFF00FFFFFFF
F00FFFFF0000FFF00FFFFFFFF00FFFFF000000000F00F000F0000F000000FFF0
0FFFFFFFF00FFFFF0000FFF00FFFFFFFF00FFFFF0000FFF00FFFFFFFF0FFFFFF
0000FFFF00FFFFFF00000FFF0000FFFF00FFFFFF00F0FFFF0000FFFF00FFFFFF
00F0FFFF0000FFFFF00FFFF00FFF0FFF0000FFFFFF00FF00FF000FFF0000FFFF
FFF0000FFFFFFFFF0000
}
OnClick = Lentille1Click
end
object Polysphrerfractante1: TMenuItem
Caption = 'Polysphère réfractante'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF000FFFFF
FFFF0FFF0000FFFF0FFFFFFFFFFF0FFF0000FFFFF0FFFFFFFFFF0FFF0000FFFF
FF0FFFFFFFF00FFF0000FFFF0F0F000FFFFF0FFF0000FFFF0000FFF00FFFFFFF
0000FFFF00FFFFFFF00FFFFF0000FFF0FFFFFFFFFFF0FFFF0000FF0FFFFFFFFF
FFFF0FFF0000FFF0FFFFFFFFFFFF0FFF0000F0FF0FFFFFFFFFFF0FFF00000F0F
F0FFFFFFFFFF0FFF0000FF0FF0FFFFFFFFFF0FFF0000F0FFF0FFFFFFFFFF0FFF
0000FF0FF0FFFFFFFFFF0FFF000000FF0FFFFFFFFFFF0FFF0000FFF0FFFFFFFF
FFFF0FFF0000FF0FFFFF00FFFFF0FFFF0000FFF0FFF0FF0FFF0FFFFF0000FFFF
000FFFF000FFFFFF0000
}
OnClick = Polysphrerfractante1Click
end
end
object Source2: TMenuItem
Caption = 'Source'
object Rayonunique1: TMenuItem
Caption = 'Rayon unique'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FF0FFFFFFFFF
FFF0000F0000FF0FFFFFFFFFFFF0FFFF0000FF0FFFFFFFFFFFFF0FFF0000FF0F
FFFFFFFFFFFFF0FF0000FF0FFFFFFFFFFFFFFF0F00000F0FFFFFFFFFFFFFFF0F
0000F00FFFFFFFFFFFF0FF0F0000FF0FFFFFFFFFFFFF00FF0000FFFFFFFFFFFF
FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFF0FFFFFFFFFFFF0000FFFFFFFF0FFFFFFFFFFF0000FFFFFFFFF0FFFFFFFFFF
0000000000000000000000000000000000000000000000000000FFFFFFFFF0FF
FFFFFFFF0000FFFFFFFF0FFFFFFFFFFF0000FFFFFFF0FFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = Rayonunique1Click
end
object Sourceponctuelle1: TMenuItem
Caption = 'Objet ponctuel réel ou virtuel'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
F00FFF0F0000FFFFFFFFFFFF000FFF0F0000FFFFFFFF000000FFFF0F0000FFFF
FFFFFF000FFFF00F0000FFFFFFFFF0000FFFFF0F0000FFFFFFFF000F0FFFFFFF
0000FFFFFFF000FF0FFFFFFF0000FFFFFF000FFFFFFFFFFF0000F000F000FFFF
0FFFFFFF00000FF0F00FFFFFFFFFFFFF0000F00FF00FFFFFFFFFFFFF00000FF0
F00FFFFFFFFFFFFF0000000FF000FFFFFFFFFFFF0000FFFFFF000FFFFFFFFFFF
0000FFFFFFF0000FF0FFFFFF0000FFFFFFFF0000F0FF00FF0000FFFFFFFFFF00
00FF0FFF0000FFFFFFFFFFF000FFF0FF0000FFFFFFFFF000000F00FF0000FFFF
FFFFFFFFF00F0FFF0000
}
OnClick = Sourceponctuelle1Click
end
object Ondeplane1: TMenuItem
Caption = 'Onde plane'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFF00F0000FFFFFFFFFFFFFFFFF0F00000FF0FFFFFF0FFFFFFF0F00000FF0F
FFFFFF0FFFFFF0F00000FF0FFFFFFFF0FFFFF00F0000F00F0000000000000000
0000FF0F00000000000000000000FFFFFFFFFFF0FFFFFFFF0000FFFFFFFFFF0F
FFFFFFFF0000FFFFFFFFF0FFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000FFFFFFFF0FFFFFFFFFFF000000FFFFFFF0FFFFFFFFFF
00000FFFFFFFFF0FFFFFFFFF0000F0FF0000000000000000000000FF00000000
0000000000000FFFFFFFFF0FFFFFFFFF0000FFFFFFFFF0FFFFFFFFFF0000FFFF
FFFF0FFFFFFFFFFF0000
}
OnClick = Ondeplane1Click
end
end
object Divers1: TMenuItem
Caption = 'Divers'
object Textesurledessin1: TMenuItem
Caption = 'Texte sur le dessin'
OnClick = Textesurledessin1Click
end
object Commenatiresurlasimulation1: TMenuItem
Caption = 'Commentaire sur la simulation'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
00000000000000000000000000000000000000FFFFFFFFFFFFFFFF00000000FF
00000FFFFFFFFF00000000FFFFFFFFFFFFFFFF00000000FF000000000000FF00
000000FFFFFFFFFFFFFFFF00000000FF000000FFFFFFFF00000000FFFFFFFFFF
FFFFFF00000000FF000000000000FF00000000FFFFFFFFFFFFFFFF00000000FF
000000000000FF00000000FFFFFFFFFFFFFFFF00000000FF000000000FFFFF00
000000FFFFFFFFFFFFFFFF00000000FF000000000000FF00000000FFFFFFFFFF
FFFFFF00000000FFFFFFFFFFFFFFFF0000000000000000000000000000000000
00000000000000000000
}
OnClick = Commenatiresurlasimulation1Click
end
object Mesurededistance1: TMenuItem
Caption = 'Mesure de distance'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FF000FFF0FF00FF00F0F0000FF0F
F0FF0F0FF0F0FFFF0000FF0FFF0F0FFF0FF0FFFF0000FF0FFF0F0FF0FFF0FFFF
0000FF0FFF0F0F0FF0F0FFFF0000FF0FFF0F0F000F000FFF0000FF0FF0FFFFFF
FFF0FFFF0000FF000FFF0FFFFFF0FFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF00000000000000000000000000000FF0FF0FF0FF0FF0FFF0
00000FF0FF0FF0FF0FF0FFF000000FFFFF0FFFFF0FFFFFF000000FFFFFFFFFFF
FFFFFFF000000FFFFFFFFFFFFFFFFFF00000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = Mesurededistance1Click
end
object Mesuredangle1: TMenuItem
Caption = 'Mesure d''angle'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFF0000FFFFFFFFFFFFFF000F000000FFFFFFFFFFFFF00F00000000FFFF
FFFFFFFFF00FF00F0000FF00FFFFFFFFF00FF00F0000FF0F00FFFFFFF00F0000
0000FF0FFF00FFFFFF000F000000FFF0FFF000FFFFFFFFFF0000FFF0FFF0FF00
0FFFFFFF0000FFF0FF0FFFFFF00FFFFF0000FFF000FFFFFFFFF00FFF0000FFF0
FFFFFFFFFFFFF00F0000FFFF0FFFFFFFFFFFFFFF0000FFFF0FFFFFFFFFFFFFFF
0000FFFF0FFFFFFFFFFFFFFF0000FFFF0FFFFFFFFFFFFFFF0000FFFF0FFFFFFF
FFFFFFFF0000FFFFF0FFFFFFFFFFFFFF0000FFFFF0FFFFFFFFFFFFFF0000FFFF
F0FFFFFFFFFFFFFF0000
}
OnClick = Mesuredangle1Click
end
object Rayonsfantomes1: TMenuItem
Caption = 'Rayons fantomes'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFEEEEE
EEEFFFFF0000FFFFFFFEEEEEEEEFFFFF0000FFFFFFFEEEEEEEEFFFFF0000FFFF
FFFEEEEEEEEFFFFF0000FFFFFFFEEEEEEEEFFFFF0000FFFFFFFEEEEEEEEFFFFF
0000FEEEEEFEEEEEEEEEEEEE0000FEEEEEEEEEEEEEEEEEEE0000FFFFEEEEE000
0EEEEFFF0000FFFFFFEE0EEEE0EFFFFF0000FFFFFFEEEEEEEEEFFFFF0000FFFF
FFEEEEEEEEEFFFFF0000FFFFFEEEEEEEEEEEFFFF0000FFFFFEEEEEEEEEEEFFFF
0000FFFFFE00EEEEE00EFFFF0000FFFFFE00EEEEE00EFFFF0000FFFFFFEEEEEE
EEEFFFFF0000FFFFFFFEEEEEEEFFFFFF0000FFFFFFFFEEEEEFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = Rayonsfantomes1Click
end
object Traitflche1: TMenuItem
Caption = 'Trait, fléche...'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFF0000FFF0FFFFFFFFFFFFFFFF0000FF0FFFFFFFFFFFFFFFFF0000F000
FFFFFFFFFFFFFFFF0000F0000FFFFFFFFFFFFFFF00000F0000FFFFFFFFFFFFFF
0000FFF0000FFFFFFFFFFFFF0000FFFF0000FFFFFFFFFFFF0000FFFFF0000FFF
FFFFFFFF0000FFFFFF0000FFFFFFFFFF0000FFFFFFF0000FFFFFFFFF0000FFFF
FFFF0000FFF0FFFF0000FFFFFFFFF0000FF0FFFF0000FFFFFFFFFF0000F0FFFF
0000FFFFFFFFFFF00000FFFF0000FFFFFFFFFFFF0000FFFF0000FFFFFFFFFFFF
F000FFFF0000FFFFFFFFFF000000FFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF
FFFFFFFFFFFFFFFF0000
}
OnClick = Traitflche1Click
end
object Oeilstylis1: TMenuItem
Caption = 'Oeil stylisé'
Bitmap.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FF0FFFFF0000FFFFFFFFFFFFF0FFFFFF0000FFFFFFFFFFFF0FFFFFFF0000FFFF
FFFFFFF0FFFFFFFF0000FFFFFFFFFF0F0FFFFFFF0000FFFFFFFFF0FFF0FFFFFF
0000FFFFFFF00FFFFF0FFFFF0000FFFFF00FFFFFFF0FFFFF0000FFF00FFFFFFF
FFF0FFFF0000000FFFFFFFFFF000FFFF0000000FFFFFFFFFF000FFFF0000FFF0
0FFFFFFFFFF0FFFF0000FFFFF00FFFFFFF0FFFFF0000FFFFFFF00FFFFF0FFFFF
0000FFFFFFFFF0FFF0FFFFFF0000FFFFFFFFFF0F0FFFFFFF0000FFFFFFFFFFF0
FFFFFFFF0000FFFFFFFFFFFF0FFFFFFF0000FFFFFFFFFFFFF0FFFFFF0000FFFF
FFFFFFFFFF0FFFFF0000
}
OnClick = Oeilstylis1Click
end
object MenuItemreseau: TMenuItem
Caption = 'Réseau diffractant'
Bitmap.Data = {
26050000424D2605000000000000760000002800000014000000140000000100
180000000000B0040000120B0000120B00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF000000FFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
00000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
000000000000FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFF000000000000FF
FFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
00000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FF
FFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF0000
00000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFF00
0000000000000000FFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000
00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF00
0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000000000
00FFFFFFFFFFFFFFFFFF
}
OnClick = MenuItemreseauClick
end
end
end
object Grille1: TMenuItem
Caption = 'Options'
object Afficherlagrille1: TMenuItem
Caption = 'Afficher la grille'
OnClick = Afficherlagrille1Click
end
object Attractiondelagrille1: TMenuItem
Caption = 'Attraction de la grille'
OnClick = Attractiondelagrille1Click
end
object Optionsdelagrille1: TMenuItem
Caption = 'Options de la grille'
OnClick = Optionsdelagrille1Click
end
object N8: TMenuItem
Caption = '-'
end
object N7: TMenuItem
Caption = 'Afficher les normales'
Checked = True
OnClick = N7Click
end
object Afficherlesangles1: TMenuItem
Caption = 'Afficher les angles'
OnClick = Afficherlesangles1Click
end
object Optionsdesnormales1: TMenuItem
Caption = 'Options des normales'
OnClick = Optionsdesnormales1Click
end
object N11: TMenuItem
Caption = '-'
end
object Couleurdefond1: TMenuItem
Caption = 'Couleur de fond ou image de fond'
OnClick = Couleurdefond1Click
end
object MenuItem7: TMenuItem
Caption = 'Indices du milieu ambiant'
OnClick = MenuItem7Click
end
object N18: TMenuItem
Caption = '-'
end
object Empennagedesrayons1: TMenuItem
Caption = 'Empennage des rayons'
OnClick = Empennagedesrayons1Click
end
object N14: TMenuItem
Caption = '-'
end
object Surfacesdonde1: TMenuItem
Caption = 'Surfaces d''onde'
OnClick = Surfacesdonde1Click
end
object N16: TMenuItem
Caption = '-'
end
object Basederegistre1: TMenuItem
Caption = 'Base de registre'
object AssocierlesfichiersoptavecOptGeo1: TMenuItem
Caption = 'Associer les fichiers .opt avec OptGeo'
OnClick = AssocierlesfichiersoptavecOptGeo1Click
end
object Dsassocier1: TMenuItem
Caption = 'Désassocier'
OnClick = Dsassocier1Click
end
end
object N20: TMenuItem
Caption = '-'
end
object Dfinirlerpertoirepersonnel1: TMenuItem
Caption = 'Définir le répertoire personnel'
OnClick = Dfinirlerpertoirepersonnel1Click
end
object MenuItem5: TMenuItem
Caption = '-'
end
object MenuItem6: TMenuItem
Caption = 'Langue'
OnClick = MenuItem6Click
end
end
object Aide1: TMenuItem
Caption = 'Aide'
object AidesurOptGeo1: TMenuItem
Caption = 'Aide sur OptGeo'
OnClick = AidesurOptGeo1Click
end
object N9: TMenuItem
Caption = '-'
end
object Contacterlauteur1: TMenuItem
Caption = 'Contacter l''auteur'
OnClick = Contacterlauteur1Click
end
object N10: TMenuItem
Caption = '-'
end
object MenuItem14: TMenuItem
Caption = 'Historique des versions'
OnClick = MenuItem14Click
end
object SiteWeb1: TMenuItem
Caption = 'Site Web'
OnClick = SiteWeb1Click
end
object N13: TMenuItem
Caption = '-'
end
object Apropos2: TMenuItem
Caption = 'A propos'
OnClick = Apropos2Click
end
object N21: TMenuItem
Caption = '-'
end
object LicenseGPL1: TMenuItem
Caption = 'License GPL'
OnClick = LicenseGPL1Click
end
end
end
object SaveDialog1: TSaveDialog
DefaultExt = '.opt'
Filter = 'Simulation OptGeo|*.opt'
FilterIndex = 0
left = 160
top = 208
end
object OpenDialog1: TOpenDialog
DefaultExt = '.opt'
Filter = 'Simulation OptGeo|*.opt|Tous les fichiers|*.*'
FilterIndex = 0
left = 232
top = 232
end
object PopupMenu1: TPopupMenu
AutoPopup = False
left = 128
top = 128
object Joindreparunsegment1: TMenuItem
Caption = 'Joindre par un segment'
end
object Joindreparunarcdecercle1: TMenuItem
Caption = 'Joindre par un arc de cercle'
end
end
object ColorDialog1: TColorDialog
Color = clBlack
CustomColors.Strings = (
'ColorA=000000'
'ColorB=000080'
'ColorC=008000'
'ColorD=008080'
'ColorE=800000'
'ColorF=800080'
'ColorG=808000'
'ColorH=808080'
'ColorI=C0C0C0'
'ColorJ=0000FF'
'ColorK=00FF00'
'ColorL=00FFFF'
'ColorM=FF0000'
'ColorN=FF00FF'
'ColorO=FFFF00'
'ColorP=FFFFFF'
'ColorQ=C0DCC0'
'ColorR=F0CAA6'
'ColorS=F0FBFF'
'ColorT=A4A0A0'
)
left = 496
top = 136
end
object FontDialog1: TFontDialog
Font.Height = -11
MinFontSize = 0
MaxFontSize = 0
left = 312
top = 216
end
object SaveDialog2: TSaveDialog
DefaultExt = '.png'
Filter = 'Portable Network Graphics|*.png'
FilterIndex = 0
left = 120
top = 294
end
object SaveDialog3: TSaveDialog
DefaultExt = '.jpg'
Filter = 'JPEG|*.jpg'
FilterIndex = 0
left = 192
top = 306
end
object PrintDialog1: TPrintDialog
left = 262
top = 121
end
object Pop: TPopupMenu
left = 423
top = 239
end
object SaveDialog4: TSaveDialog
DefaultExt = '.ps'
Filter = '.ps|Postscript'
FilterIndex = 0
left = 571
top = 239
end
object OpenDialogImageFonds: TOpenDialog
Filter = 'Image jpg|*.jpg|Image png|*.png'
left = 670
top = 127
end
end
|