问几个delphi的属性问题
edit.begindrag(false,10);表面看应该是开始拖动里面的false,10参数本别对应什么？
procedure TDragForm.ListDragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept := True;
if (Source = Edit1) and
((Sender as TCustomListBox).Items.IndexOf (Edit1.Text) >= 0) then
Accept := False;
end
这个事件的accept起什么作用？
state是做什么用的？
有没有好心的高手给我点分啊 问题问的我只剩下2位数了
accept作用是，是否接受拖放，你自己弄一个试试便知
ACCEPT 为true DragDown事件才会被触发
拖放一个东西到list上，通过ondragover判断是否负责条件，accept为true.会改变光标为拖放光标，否则则是禁止光标，在dragdown时判断accept 为true则触发事件了
相关问答：
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
主窗体:
Delphi(Pascal) code:
procedure TfrmMain.btnResumeClick(Sender: TObject);
begin
myThread := TClientThread.Create(LeftPart(cbbServer.Text, ':'), StrToInt(RightPart(cbbServer.Text, ':')) ......
定义：
type
pm= packed record { IO记录 }
Name:string[16]; { IO名称 }
CHn:Byte; {输入通道号 }
Pvh:Double; { 量程上� ......
