equal
deleted
inserted
replaced
77 size:= cScreenWidth * cScreenHeight * 3; |
77 size:= cScreenWidth * cScreenHeight * 3; |
78 p:= GetMem(size); |
78 p:= GetMem(size); |
79 |
79 |
80 // update header information and file name |
80 // update header information and file name |
81 |
81 |
82 filename:= ParamStr(1) + '/Screenshots/' + filename + '.bmp'; |
82 filename:= UserPathPrefix + '/Screenshots/' + filename + '.bmp'; |
83 |
83 |
84 head[$02]:= (size + 54) and $ff; |
84 head[$02]:= (size + 54) and $ff; |
85 head[$03]:= ((size + 54) shr 8) and $ff; |
85 head[$03]:= ((size + 54) shr 8) and $ff; |
86 head[$04]:= ((size + 54) shr 16) and $ff; |
86 head[$04]:= ((size + 54) shr 16) and $ff; |
87 head[$05]:= ((size + 54) shr 24) and $ff; |
87 head[$05]:= ((size + 54) shr 24) and $ff; |