感觉DELPHI很像Win32汇编
语法上不谈,就编写格式、形式上,很像
delphi的一个函数
procedure TForm1.btn1Click(Sender: TObject);
begin
cds.Close;
qry1.SQL.Add( 'select * from "276793422"."276793422"' );
cds.Open;
end;
begin
cds.Close;
qry1.SQL.Add( 'select * from "276793422"."276793422"' );
cds.Open;
end;
这是汇编的主窗口回调
WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM
.IF uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.ELSEIF uMsg==WM_CREATE
;
.ELSE
invoke DefWindowProc,hWnd,uMsg,wParam,lParam
ret
.ENDIF
xor eax,eax
ret
WndProc endp
.IF uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.ELSEIF uMsg==WM_CREATE
;
.ELSE
invoke DefWindowProc,hWnd,uMsg,wParam,lParam
ret
.ENDIF
xor eax,eax
ret
WndProc endp
感觉,嗷嗷像,就是少了几个括号而已。