小编Cod*_*odr的帖子

将图像放在Delphi/Win32中的组合框(右边缘)中

我想在Delphi/Win32中的组合框(右边缘)内绘制一个图像.

组合框的样式为csDropDown.这不适用于csOwnerDrawFixedcsOwnerDrawVariable.

组合框应该是可编辑的,类似于浏览器的地址栏.

有没有创建额外的Delphi组件的Win32解决方案?

我尝试了以下,但它不起作用.我能用Delphi 7做到吗?

TForm1 = class(TForm)
  ...
private
  FChDirComboWndProc: TWndMethod;
  procedure ChDirComboWndProc(var Message: TMessage);
  ...

procedure TForm1.FormCreate(Sender: TObject);
begin
  FChDirComboWndProc := ChDirComboBox.WindowProc; // save old window proc
  ChDirComboBox.WindowProc := ChDirComboWndProc; // subclass
end;

procedure TForm1.ChDirComboWndProc(var Message: TMessage);
begin
    WM_ERASEBKGND: begin    // WM_PAINT ?
        SetBkMode(Message.WParam, TRANSPARENT);
        SetTextColor(Message.wParam, GetSysColor(COLOR_GRAYTEXT));
        FillRect(Message.wParam, Rect(3,3,300,30), GetStockObject(BLACK_BRUSH ));
        Rectangle(Message.wParam, 15,15, 100, 100); //Test
        OutputDebugString(PCHar(Format('aa %d %d %d',[Message.WParam, Message.LParam, ChDirComboBox.Handle])));
      end;
  end;
  FChDirComboWndProc(Message); // process message
end;
Run Code Online (Sandbox Code Playgroud)

delphi winapi combobox delphi-7

6
推荐指数
1
解决办法
1210
查看次数

这个HTML代码是什么意思?

我找到了以下HTML代码

<i data-toggle="tooltip" class="icon-ok-sign" data-original-title="File not detected"></i>
Run Code Online (Sandbox Code Playgroud)

https://www.virustotal.com/en/file/9d72e0523cc6bd4baa1bd88967aec1402551a5d565703b799ce6be52ec1a7640/analysis/

为什么他们使用<i>?
如何获取"icon-ok-sign"图标的路径?
如何使用Chrome浏览器菜单项"Inspect Element"找到图标路径?

css html5

0
推荐指数
1
解决办法
114
查看次数

标签 统计

combobox ×1

css ×1

delphi ×1

delphi-7 ×1

html5 ×1

winapi ×1