2020年3月24日 星期二

C# MessageBox 常用語法

  MessageBox.Show("Hello World");



  DialogResult result;
  result = MessageBox.Show("Are you OK?", "Question",
    MessageBoxButtons.YesNo,
    MessageBoxIcon.Question);
  if (result = DialogResult.Yes)
  {
    ...
  }


2020年3月20日 星期五

C# DevExpress PopupMenu




                    Point pointPos = new Point();
                    pointPos.X = button1.Left;
                    pointPos.Y = button1.Left + button1.Height;
                    pointPos = button1.PointToScreen(pointPos);
                    popupMenu1.ShowPopup(pointPos);

2020年3月5日 星期四

Which is the best way to load a string (HTML code) in TWebBrowser?

procedure THTMLEdit.EditText(CONST HTMLCode: string);
var
  Doc: Variant;
begin
  if NOT Assigned(wbBrowser.Document) then
    wbBrowser.Navigate('about:blank');

  Doc := wbBrowser.Document;
  Doc.Clear;
  Doc.Write(HTMLCode);
  Doc.Close;
end;


https://stackoverflow.com/questions/39773033/which-is-the-best-way-to-load-a-string-html-code-in-twebbrowser