|
@@ -895,45 +895,6 @@ begin
|
|
|
btnNotPass.Left := btnPass.Left + btnPass.Width + 1;
|
|
|
end;
|
|
|
|
|
|
- if btnSubmit.Visible then
|
|
|
- begin
|
|
|
- if (btnSubmit.Enabled) then
|
|
|
- begin
|
|
|
- btnSubmit.PicNormal.LoadFromFile(GetAppFilePath + 'Data/img/report_normal.bmp');
|
|
|
- btnSubmit.PicMouseOver.LoadFromFile(GetAppFilePath + 'Data/img/report_hover.bmp');
|
|
|
- btnSubmit.PicMouseDown.LoadFromFile(GetAppFilePath + 'Data/img/report_active.bmp');
|
|
|
- end
|
|
|
- else
|
|
|
- btnSubmit.PicDisable.LoadFromFile(GetAppFilePath + 'Data/img/report_disabled.bmp');
|
|
|
- btnSubmit.Paint;
|
|
|
- end;
|
|
|
-
|
|
|
- if btnPass.Visible then
|
|
|
- begin
|
|
|
- if (btnPass.Enabled) then
|
|
|
- begin
|
|
|
- btnPass.PicNormal.LoadFromFile(GetAppFilePath + 'Data/img/pass_normal.bmp');
|
|
|
- btnPass.PicMouseOver.LoadFromFile(GetAppFilePath + 'Data/img/pass_hover.bmp');
|
|
|
- btnPass.PicMouseDown.LoadFromFile(GetAppFilePath + 'Data/img/pass_active.bmp');
|
|
|
- end
|
|
|
- else
|
|
|
- btnPass.PicDisable.LoadFromFile(GetAppFilePath + 'Data/img/pass_disabled.bmp');
|
|
|
- btnPass.Paint;
|
|
|
- end;
|
|
|
-
|
|
|
- if btnNotPass.Visible then
|
|
|
- begin
|
|
|
- if (btnNotPass.Enabled) then
|
|
|
- begin
|
|
|
- btnNotPass.PicNormal.LoadFromFile(GetAppFilePath + 'Data/img/unpass_normal.bmp');
|
|
|
- btnNotPass.PicMouseOver.LoadFromFile(GetAppFilePath + 'Data/img/unpass_hover.bmp');
|
|
|
- btnNotPass.PicMouseDown.LoadFromFile(GetAppFilePath + 'Data/img/pass_active.bmp');
|
|
|
- end
|
|
|
- else
|
|
|
- btnNotPass.PicDisable.LoadFromFile(GetAppFilePath + 'Data/img/pass_disabled.bmp');
|
|
|
- btnNotPass.Paint;
|
|
|
- end;
|
|
|
-
|
|
|
ShowPhaseHint;
|
|
|
|
|
|
if Assigned(FCheckerFrame) then
|
|
@@ -1231,12 +1192,6 @@ begin
|
|
|
b3 := (FProjectData.ProjProperties.PhaseCount = FProjectData.PhaseIndex);
|
|
|
|
|
|
pnlNewPhase.Visible := b1 and b2 and b3;
|
|
|
- if (pnlNewPhase.Visible) then
|
|
|
- begin
|
|
|
- btnNewPhase.PicNormal.LoadFromFile(GetAppFilePath + 'Data/img/new_normal.bmp');
|
|
|
- btnNewPhase.PicMouseOver.LoadFromFile(GetAppFilePath + 'Data/img/new_hover.bmp');
|
|
|
- btnNewPhase.PicMouseDown.LoadFromFile(GetAppFilePath + 'Data/img/new_active.bmp');
|
|
|
- end;
|
|
|
end;
|
|
|
|
|
|
procedure TProjectFrame.actnCurPhaseExecute(Sender: TObject);
|