感觉DELPHI很像Win32汇编

语法上不谈，就编写格式、形式上，很像

delphi的一个函数

procedure TForm1.btn1Click(Sender: TObject);
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

感觉，嗷嗷像，就是少了几个括号而已。