delphi小技巧问题 delphi菜鸟编程````````

delphi小技巧问题

我的不会有这种现象，建议你重装一下，

如果不想重装，那就不要用F9，而是改用 Ctrl F9

Ctrl F9 编译生成exe后，然后再去点击exe执行 ，不就看到运行结果了吗

另外快捷键如下，重新打开object inspector，按F1 重新打开object treeview，按Shift Alt F11

delphi菜鸟编程````````

procedure TForm1.Button1Click(Sender: TObject)
var
q1,q2,q3:Double
p1,p2,p3,t:Double
begin
q1:=StrToFloat(edit1.text)
q2:=StrToFloat(edit3.text)
q3:=StrToFloat(edit5.text)
p1:=StrToFloat(edit2.text)
p2:=StrToFloat(edit4.text)
p3:=StrToFloat(edit6.text)
t:=q1*p1 q2*p2 q3*p3
label6.Caption :=总价为： FloatToStr(t)
end

如何用Delphi 6 编程让文本动起来

如果不想定义TestX方法,也可以如下方法直接调用
TThread.CreateAnonymousThreadX( procedure(Avalue:Integer) begin btnContinue.Caption:=IntToStr(Avalue) end ,12345).Start