线程，看到这两个字我不由的想起了Windows操作系统下的“任务管理器”中的进程选项卡，我知道线程和它有关联至于是什么关系是不知道的。不过在学习了Delphi中的多线程后，才对线程有了大概的了解。说是大概实际上是一种无奈的表现，我看的这本书中对于线程只介绍了下概念-------“线程是由一个堆栈、CPU寄存器的状态和系统� ......
begin
ADOQuery1.close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Text:='select password from userinfo where username='''+label2.Caption +'''';
Adoquery1.open;
if edit1.Text <>Adoquery1.Fields[0].AsString then
begin
Application.MessageBox( ......
我前面发了一个贴子。可能请得不是太清楚。
比如反汇编程序里面有这样一段代码。
400001 push ecx
400002 call xxxxxxxx
40007 mov [esi+64],eax
call xxxxxxxxxx 这里面是一个记算函数。最后得 ......
试做WORD插件，在工具栏上添加了个按钮。插件中放一窗体Form1,请问：如何点击按钮后，弹出窗体Form1?
procedure TAddIn.TestClick(const Ctrl: OleVariant;
var CancelDefault: OleVariant);
begin
//即此处弹出窗体Form1
CancelDefault := True;
end; ......
大家说说自己的想法，
我暂时打算先从命名规范开始
1.去掉垃圾变量和注释
2.修改变量和函数名
3.拆分函数
4.形成新的单元文件，重新安排函数应该在的单元
5.整理成类，然后调整类与类的关系等
我觉得，即使123点看似简单，但是实际操作起来还有难度。
比如，怎么入手去修改代码，按照� ......
1.线程代码：
procedure TTest.Execute;
var
i:integer;
begin
{ Place thread code here }
OnTerminate:=Form1.Done;
if WaitForSingleObject(HMux,INFINITE)=WAIT_OBJECT_0 then
begin
for i:= 1 to 128 do
begin
&nbs ......
最新文章 : delphi