mirror-github-bspeice/apophysis
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

All flames are again possible to be posted

Browse Source
This commit is contained in:
ronaldhordijk 2005-03-24 13:55:58 +00:00
parent 58d2734057
commit 48c798cd88
2 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
2.02g/Source/Main.dfm
View File

@ -2,7 +2,7 @@ object MainForm: TMainForm
Left = 316 Left = 316
Top = 424 Top = 424
Width = 574 Width = 574
Height = 515 Height = 535
Caption = 'Apophysis' Caption = 'Apophysis'
Color = clBtnFace Color = clBtnFace
Font.Charset = ANSI_CHARSET Font.Charset = ANSI_CHARSET
@ -27,7 +27,7 @@ object MainForm: TMainForm
Left = 160 Left = 160
Top = 28 Top = 28
Width = 4 Width = 4
Height = 414 Height = 434
end end
object ToolBar: TToolBar object ToolBar: TToolBar
Left = 0 Left = 0
@ -251,7 +251,7 @@ object MainForm: TMainForm
Left = 0 Left = 0
Top = 28 Top = 28
Width = 160 Width = 160
Height = 414 Height = 434
Align = alLeft Align = alLeft
Columns = < Columns = <
item item
@ -270,7 +270,7 @@ object MainForm: TMainForm
Left = 164 Left = 164
Top = 28 Top = 28
Width = 402 Width = 402
Height = 414 Height = 434
Align = alClient Align = alClient
BevelInner = bvLowered BevelInner = bvLowered
BevelOuter = bvNone BevelOuter = bvNone
@ -281,7 +281,7 @@ object MainForm: TMainForm
Left = 1 Left = 1
Top = 1 Top = 1
Width = 400 Width = 400
Height = 412 Height = 432
Align = alClient Align = alClient
AutoSize = True AutoSize = True
PopupMenu = DisplayPopup PopupMenu = DisplayPopup
@ -293,7 +293,7 @@ object MainForm: TMainForm
end end
object StatusBar: TStatusBar object StatusBar: TStatusBar
Left = 0 Left = 0
Top = 442 Top = 462
Width = 566 Width = 566
Height = 19 Height = 19
Panels = < Panels = <

16
2.02g/Source/Main.pas
View File

@ -3964,15 +3964,15 @@ var
ResponseStream: TMemoryStream; ResponseStream: TMemoryStream;
MultiPartFormDataStream: TmsMultiPartFormDataStream; MultiPartFormDataStream: TmsMultiPartFormDataStream;
begin begin
if MainCp.HasNewVariants then begin // if MainCp.HasNewVariants then begin
showMessage('The posting of sheep with new variants (exponential, power, cosine and sawtooth) is disabled in this version.'); // showMessage('The posting of sheep with new variants (exponential, power, cosine and sawtooth) is disabled in this version.');
Exit; // Exit;
end; // end;
if MainCp.FAngle <> 0 then begin // if MainCp.FAngle <> 0 then begin
showMessage('The posting of sheep with are rotated is disabled in this version.'); // showMessage('The posting of sheep with are rotated is disabled in this version.');
Exit; // Exit;
end; // end;
if SheepDialog.ShowModal = mrOK then if SheepDialog.ShowModal = mrOK then
begin begin