這是我的代碼中的錯誤
這是代碼:
{=================================================================================}
procedure TFormGameSettings.pnlPlayerColor1Click(Sender: TObject);
begin
if PlayerColorDialog1.Execute then
begin
FSpieler1farbe := PlayerColorDialog1.Color;
PanelColorChange;
end;
end;
{=================================================================================}
procedure TFormGameSettings.pnlPlayerColor2Click(Sender: TObject);
begin
if PlayerColorDialog2.Execute then
begin
FSpieler1farbe := PlayerColorDialog2.Color;
PanelColorChange;
end;
end;
{=================================================================================}
我真的不知道如何解決這個問題,我對 delphi 很陌生。在我更改“PlayerColorDialog2.Color;”中的顏色之前 一切都很好,知道我得到了布林值。
感謝您的時間。
uj5u.com熱心網友回復:
“如果 ErrorInsight 繼續在代碼中明顯沒有錯誤的地方標記錯誤,請嘗試關閉專案并重新打開它!” @德爾福編碼器
您的評論有幫助,我想這是一個錯誤。
非常感謝!
轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/522341.html
標籤:德尔福
