procedure TForm1.Button11Click(Sender: TObject);
var i:Integer;
begin
i := pos('.',edit1.Text);
if i>0 then
A := edit1.Text
else
A := edit1.Text + button11.Caption;
edit1.Text := A;
end;
紅色部分出現這個問題:[Error] calculator.pas(177): Missing operator or semicolon
uj5u.com熱心網友回復:
代碼上機試過了通過。D7無問題。是否calculator.pas 定義了POS函式。
uj5u.com熱心網友回復:
代碼沒問題,是不是Delphi的問題轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/87410.html
標籤:語言基礎/算法/系統設計
