用畫刷在屏幕上寫字

procedure TForm1.btn1Click(Sender: TObject); var c:TCanvas; begin c:= TCanvas.Create; c.Pen.Width := 5; c.Font.Size := 20; c.Font.Name := '微軟雅黑'; c.Font.Color := clRed; c.Brush.Color :=
相關文章
相關標籤/搜索