我的问题是关于Delphi 7.我需要获取当前选择的ComboBox1值,以便在我的代码中将其用作浮点变量:
t:=t+ComboBox1. // Not sure what to write here...
Run Code Online (Sandbox Code Playgroud)
谢谢!
我正在使用一个TComboBox组件,其style属性设置为csOwnerDrawFixed,我实现了OnDrawItem并且一切正常,现在我想要哪个组合框表现得像csDropDown样式(csOwnerDrawFixed样式的行为类似于csDropDownList样式),我的意思是内部编辑.这可能吗?
我正在使用Delphi XE2的TButtonedEdit,但我想为历史记录添加一个下拉列表(如TComboBox).我知道TComboBox是一个美化的TEdit,所以我可以发送一条消息给TButtonedEdit来添加这个功能吗?谢谢.
我正在尝试使用TDBLookupCombo,但是收到错误"EInvalidOperation with message'LookupSource必须连接到TTable组件'.
我将TDBLookupCombo.LookupSource连接到TDataSource.TDataSource.Dataset指向一个TClientDataSet,它包含查找表的记录(字段ID和描述).
LookupDisplay := 'Description';
LookupField := 'ID';
LookupSource := dsLookup;
Run Code Online (Sandbox Code Playgroud)
这是不可能的,因为TCilentDataSet不是TTable的后代?如果是这样,那么在不使用第三方组件的情况下,最佳选择是什么.
我希望在TCombobox更改值的唯一方法是使用鼠标.
如果Items为1,2和3,则用户可以键入4,它将成为值.
我试图使用OnKeyDown但不知何故我想"避免关键".怎么做到这一点?
我正在Delphi XE2中开发一个应用程序,它通过EnumWindows和EnumChildWindows函数检查一个运行应用程序的窗口,该窗口也是用Delphi编写的.
这是主要代码(改编自一个例子:http://www.swissdelphicenter.ch/torry/showcode.php?id = 410)
function EnumChildWindowsProc(Wnd: HWnd; Form: TForm1): Bool; export;
{$ifdef Win32} stdcall; {$endif}
var
Buffer: array[0..99] of Char;
begin
GetWindowText(Wnd, Buffer, 100);
if StrPas(Buffer) = '' then Buffer := 'Empty';
new(AWindows);
with AWindows^ do
begin
WindowHandle := Wnd;
WindowText := StrPas(Buffer);
end;
CNode := Form1.TreeView1.Items.AddChildObject(PNode,
AWindows^.WindowText + ':' +
IntToHex(AWindows^.WindowHandle, 8), AWindows);
if GetWindow(Wnd, GW_CHILD) = 0 then
begin
PNode := CNode;
Enumchildwindows(Wnd, @EnumChildWindowsProc, 0);
end;
Result := True;
end;
function EnumWindowsProc(Wnd: HWnd; …Run Code Online (Sandbox Code Playgroud) delphi ×7
tcombobox ×7
delphi-xe2 ×3
combobox ×1
data-aware ×1
delphi-xe ×1
ownerdrawn ×1
spy++ ×1
tlabel ×1