建立一個文字窗體

文字窗體代碼 procedure  TForm1.btn1Click(Sender: TObject); var   rgn:HRGN; begin   Self.Color : =  clBlue;   BeginPath(Canvas.handle);   SetBkMode(Canvas.Handle,TRANSPARENT );   Canvas.Font.Name : =   ' 宋體
相關文章
相關標籤/搜索