Minor changes
This commit is contained in:
parent
be818315f6
commit
f2fb29308b
4
.gitignore
vendored
Normal file
4
.gitignore
vendored
Normal file
|
@ -0,0 +1,4 @@
|
|||
*.o
|
||||
*.ppu
|
||||
*.exe
|
||||
*.out
|
1
generated_images/.gitignore
vendored
Normal file
1
generated_images/.gitignore
vendored
Normal file
|
@ -0,0 +1 @@
|
|||
*.bmp
|
10
gui/gui.pas
10
gui/gui.pas
|
@ -99,7 +99,7 @@ var
|
|||
wr: TRect;
|
||||
begin
|
||||
wr.assign(0, 0, 60, 19);
|
||||
inherited Init(wr, 'Generator');
|
||||
inherited Init(wr, 'Mandelbrot generator');
|
||||
Options := Options or ofCentered;
|
||||
HelpCtx := $F000;
|
||||
|
||||
|
@ -107,7 +107,7 @@ begin
|
|||
curY := 2;
|
||||
|
||||
with GenerateData do begin
|
||||
path := './images';
|
||||
path := '../generated_images';
|
||||
width := '512';
|
||||
height := '512';
|
||||
power := '2';
|
||||
|
@ -137,9 +137,9 @@ end;
|
|||
procedure TMSApp.ShowAbout();
|
||||
begin
|
||||
MessageBox(
|
||||
#3'Multibrot Set Generator GUI'#13 +
|
||||
#3'Math images generator'#13 +
|
||||
#3'Developed by Artem K.'#13 +
|
||||
#3'MF BMSTU 2019',
|
||||
#3'MF BMSTU 2019 - 2020',
|
||||
nil,
|
||||
mfInformation or mfOkButton
|
||||
);
|
||||
|
@ -200,7 +200,7 @@ begin
|
|||
GetExtent(r);
|
||||
r.b.y := r.a.y + 1;
|
||||
MenuBar := New(PMenuBar, Init(r, NewMenu(
|
||||
NewItem('~N~ew', '', kbNoKey, cmNew, hcNew,
|
||||
NewItem('~M~andelbrot', '', kbNoKey, cmNew, hcNew,
|
||||
NewItem('~A~bout', '', kbNoKey, cmAbout, hcNoContext,
|
||||
NewItem('~E~xit', 'Alt+X', kbAltX, cmQuit, hcExit,
|
||||
nil)))))
|
||||
|
|
2
images/generated/.gitignore
vendored
2
images/generated/.gitignore
vendored
|
@ -1,2 +0,0 @@
|
|||
*
|
||||
!.gitignore
|
BIN
images/k.bmp
BIN
images/k.bmp
Binary file not shown.
Before Width: | Height: | Size: 247 KiB |
Loading…
Reference in New Issue
Block a user