最酷的程序员用KOVCL 库是Delphi程序员熟知的，她几乎成了Delphi RAD技术的代言人。
VCL拥有世界上最大最丰富的控件资源涵盖了软件开发的各个方面，远远超过其他开发工具，是每个程序员所垂涎。VCL的优点不再多说，现在我要向各位Delphi兄弟介绍另一套Delphi上的类库:KOL。
KOL是什么？
KOL - Key Objects Library is a set of objects to develop power 32 bit Windows GUI applications using Delphi. It is distributed free of charge, with source code.
   Delphi2, Delphi3, Delphi4 and Delphi5 are supported. KOL allows to create very compact GUI applications (starting from ~13,5K without compression - if suggested system units replacement used). The most of code is converted to built-in assembler.
   Help generating tool xHelpGen is provided for KOL, which creates detailed documentation in html format. Documentation is generated on base of comments from the source, so developers instantly  have Access to the most fresh and complete documentation.
   Programming for KOL was totally non-visual earlier, but with opening project MCK (Mirror Classes Kit), all advantages of visual programming become available for developers who use KOL.
   Starting from April, 2001 the unit KOLEdb provided, which allows to create tiny (but power) database applications starting from 24K of executable size. It uses OLE DB protocol, so any database can be supported, including network database.
(以上这段摘自KOL的主页)
"没有一个字节的代码是废物"

(我写的第2个KOL程序，35K，Aspack压缩后28K，1个Exe不需要任何运行库)
现在的VCL应用程序虽然很优美，但还不够精简（a little oversized），一个空空的GUI程序至少有270K(Delphi5)，原因是Borland的编译器技术虽然精湛，具有SmartLink技术（只把用到的代码连接到EXE），但对于很多面向对象编程中采用了大量的的方法继承，虚方法表，使得 SmartLink也无能为力。而且随着 Delphi 升级，基本对象的方法和属性的代码也越来越大。采用分离的运行库编译虽然可以减小EXE，但要求客户端安装VCL运行库是困难的，除非微软让步......（不说也罢）。不过总的说来，虽然基于VCL的程序有冗余代码，但相对其他同类类库，EXE尺寸已经算很不错了，一般在数百K到1、2M左右。其实我们很早就听说直接用WinAPI可以创建很小的程序(有个著名的TestGUI.DPR)，因此有些程序员就打算自己建VCL以外的类库，具有VCL主要的功能，创造精简的
程序。Delphi上的非VCL类库目前我所见到的有3个，分别为 ACL,XCL/KOL 都出自俄罗斯（老毛子高人辈出，而且是历史上很多革命的发源地）。其中最具有革命性的就属KOL库，作者 Vladimir Kladov 在1999年就开始设计 XCL，XCL出到1.86(2000年7月)
特点是重写VCL，删除不必要使用很少的对象属性和方法，其体系与VCL类似，也是
对象继承方式。
到2000年，Vladimir Kladov 发现XCL虽然有效，但不能根本解决问题，或者说有可能重蹈VCL库覆辙，于是他停下了XCL，推出了更大胆的计划KOL。其技术要点是设计了一个巨无霸对象TControl，避免了对象继承，用不同的NewXXXX方法创建对象，使得编译器可以轻松的剔掉冗余代码，另外还有替换System单元等多种手段。听起来很不可思议，是吧？哈哈，但我玩过最新的KOL，发现它的确实厉害，KOL的目标并不是取代VCL，而是帮助我们完成一些功能齐全的，尺寸紧凑的专用EXE(最小的KOL GUI 程序只有9.5k)，这在我们将来设计一些通过网上分发或嵌入设备程序会很有用。另外，KOL中重写了的TStrList、TList等大量对象比原来的VCL效率更高。


KOL的程序设计难吗？
（以下部分内容据我今天(2001/5/14)刚从网上更新的0.74KOL，0.73MCK库而来，而KOL最近更新很频繁，请大家关注其网站）
早期的KOL的程序开发是完全"非可视"的，其标准例子可看出。不过用KOL的程序员，绝非等闲之辈，相信 VC++/MFC的哥们也会很容易上手，因为和 WinAPI打交道其实也很亲切，但KOL绝对是一个优越面向对象的类库，建新程序中自己手写的代码已经不算多了。
但Kladov又推出一个可视开发工具 MCK(镜象构件库)，非常巧妙的利用了Delphi的IDE
实现了可视开发。当然很多人建议设计VCL工程翻译工具可能更方便，但现在还没人去做，毕竟是个革命性的东西，需要更多人参与。我个人认为MCK还算个很好的思路，至少在新工程开发上不难。但传统的Delphi程序员一定要有思想准备，你的第一个KOL程序花的时间肯定是你第一个VCL程序的数倍甚至更多（第一个VCL程序只要按一下F9就行了，呵呵）将来的KOL会“可视”到什么程度，我的估计应该很乐观。
现在KOL已经有OLEdb 和 DBF 数据库的控件了，由于 VCL的控件大多源码开放，KOL的控件群出现指日可待。
说到可视化工具MCK，我真的很佩服Kladov的匠心独具，Kladov有一句话很有意思：
“KOL/XCL从一开始就没打算设计成可视化开发方式...我反复的告戒自己KOL可视化是不可能的，可是我熬了4个通宵后，事情好象办成了...”
说这么多差不多了，各位赶快去KOL主页上看看吧。

其他
你写的第一个KOL Form 注意上的 defaultPosition defaultSize 属性请设为 False.
希望各位Delphi兄弟有空交流KOL开发经验，我的信箱： superpage@163.net
L

有没有谁用过KOL?它有一句话很牛,"没有一个字节的代码是废物".

下下来看了一下
觉得不好
使用这个还不如直接使用SDK方式算了
至少使用SDK我很清楚做什么，要什么API
使用这个KOL有点头晕。
看看它例子里面的代码，不比SDK简单

复制内容到剪贴板

代码:

{$IFDEF USE_SYSDCUREPLACE}
  UseErrorMessageBox;
{$ENDIF}

{$IFDEF USE_APPBUTTON}
  Applet := NewApplet( 'TstApp' );
  {$IFDEF TEST_APPLETINVISIBLE}
  Applet.Visible := False;
  {$ENDIF}
  {$IFNDEF USE_RESOURCE}
  Applet.Icon := THandle(-1);
  {$ENDIF}
{$ENDIF}

  {$IFDEF TEST_LIST}
  Experiment_TList;
  {$ENDIF}

  {$IFDEF TEST_RECT}
  Experiment_TRect;
  {$ENDIF}

  W := NewForm( Applet, 'Test' );
  {$IFNDEF USE_APPBUTTON}
  {$IFNDEF USE_RESOURCE}
  W.Icon := THandle(-1);
  {$ENDIF}
  {$ENDIF}

  {$IFDEF CREATE_VISIBLE}
  W.CreateVisible := True;
  {$ENDIF}

  {$IFDEF TEST_NOCAPTION}
  W.HasCaption := False;
  {$ENDIF}

  {$IFDEF TEST_NOBORDER}
  W.HasBorder := False;
  W.Margin := 0;
  {$ENDIF}

  {$IFDEF TEST_ONTOP}
  W.StayOnTop := True;
  {$ENDIF}

  {$IFDEF TEST_NORESIZE}
  W.CanResize := False;
  {$ENDIF}

  {$IFDEF TEST_PARENTFONTCOLOR}
  W.Font.Color := clHighlight;
  W.Font.FontStyle := [ fsBold, fsItalic ];
  {$ENDIF}

  P1 := NewPanel( W, esRaised );

  L1 := NewLabel( P1, 'Label1' );

  B1 := NewButton( P1, 'Button1' ).PlaceUnder;//.SetSize( 80, 0 );

  C1 := NewCheckbox( P1, 'Checkbox1' ).PlaceUnder.SetSize( 110, 0 );

  C2 := NewCheckbox( P1, 'Checkbox2' ).PlaceUnder.SetSize( 110, 0 );
  C2.Checked := True;

  C2.ResizeParent;

  P1.ResizeParent;

  B2 := NewButton( W, 'Button2' ).PlaceRight;

  BX := NewButton( W, 'X' ).SetSize( 18, 0 ).PlaceRight.ResizeParentRight;

  L2 := NewLabel( W, 'Label2' ).PlaceUnder.AlignLeft( B2 );

  {$IFDEF TEST_GROUP}
  P2 := NewGroupbox( W, 'Group1' ).PlaceUnder;
  {$ELSE}
  P2 := NewPanel( W, esLowered ).PlaceUnder;
  {$ENDIF}

对照一下一个标准的C++SDK方式编写的窗口程序

复制内容到剪贴板

代码:

#include

/*  Declare Windows procedure  */
LRESULT CALLBACK WindowProcedure (HWND, UINT, WPARAM, LPARAM);

/*  Make the class name into a global variable  */
char szClassName[ ] = "WindowsApp";

int WINAPI WinMain (HINSTANCE hThisInstance,
                    HINSTANCE hPrevInstance,
                    LPSTR lpszArgument,
                    int nFunsterStil)

{
    HWND hwnd;               /* This is the handle for our window */
    MSG messages;            /* Here messages to the application are saved */
    WNDCLASSEX wincl;        /* Data structure for the windowclass */

    /* The Window structure */
    wincl.hInstance = hThisInstance;
    wincl.lpszClassName = szClassName;
    wincl.lpfnWndProc = WindowProcedure;      /* This function is called by windows */
    wincl.style = CS_DBLCLKS;                 /* Catch double-clicks */
    wincl.cbSize = sizeof (WNDCLASSEX);

    /* Use default icon and mouse-pointer */
    wincl.hIcon = LoadIcon (NULL, IDI_APPLICATION);
    wincl.hIconSm = LoadIcon (NULL, IDI_APPLICATION);
    wincl.hCursor = LoadCursor (NULL, IDC_ARROW);
    wincl.lpszMenuName = NULL;                 /* No menu */
    wincl.cbClsExtra = 0;                      /* No extra bytes after the window class */
    wincl.cbWndExtra = 0;                      /* structure or the window instance */
    /* Use Windows's default color as the background of the window */
    wincl.hbrBackground = (HBRUSH) COLOR_BACKGROUND;

    /* Register the window class, and if it fails quit the program */
    if (!RegisterClassEx (&wincl))
        return 0;

    /* The class is registered, let's create the program*/
    hwnd = CreateWindowEx (
           0,                   /* Extended possibilites for variation */
           szClassName,         /* Classname */
           "Windows App",       /* Title Text */
           WS_OVERLAPPEDWINDOW, /* default window */
           CW_USEDEFAULT,       /* Windows decides the position */
           CW_USEDEFAULT,       /* where the window ends up on the screen */
           544,                 /* The programs width */
           375,                 /* and height in pixels */
           HWND_DESKTOP,        /* The window is a child-window to desktop */
           NULL,                /* No menu */
           hThisInstance,       /* Program Instance handler */
           NULL                 /* No Window Creation data */
           );

    /* Make the window visible on the screen */
    ShowWindow (hwnd, nFunsterStil);

    /* Run the message loop. It will run until GetMessage() returns 0 */
    while (GetMessage (&messages, NULL, 0, 0))
    {
        /* Translate virtual-key messages into character messages */
        TranslateMessage(&messages);
        /* Send message to WindowProcedure */
        DispatchMessage(&messages);
    }

    /* The program return-value is 0 - The value that PostQuitMessage() gave */
    return messages.wParam;
}


/*  This function is called by the Windows function DispatchMessage()  */

LRESULT CALLBACK WindowProcedure (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    switch (message)                  /* handle the messages */
    {
        case WM_DESTROY:
            PostQuitMessage (0);       /* send a WM_QUIT to the message queue */
            break;
        default:                      /* for messages that we don't deal with */
            return DefWindowProc (hwnd, message, wParam, lParam);
    }

    return 0;
}

完全不懂delphi的路过

KOL的确牛，很多人在用的，特别是做加密和木马类东西的。

以前用过2.30和2.70版的，现在是2.8X版了。

KOL是可视化开发的，很多代码是自动生成的，楼上的5bxb不了解吧。KOL可以转换VCL来用，因此，有很多待用资源。KOL的缺点也特别明显，就是没有VCL容易使用和功能强大，此外，就是现成的控件还太少，需要自己动手，丰衣足食。

俺最受不了KOL在删除控件后没有自动回收垃圾代码而需要自己手工删除这一点。

KOL里有不少高质量的实用代码，值得看看。

可惜不是C++写的

[ 本帖最后由 vender 于 2008-1-8 00:19 编辑 ]

用过，不太好用
大多数情况下对文件尺寸并没有要求
想要控制文件尺寸的情况很少(专门写病毒木马的除外)，而且用sdk还来得方便一些

一个规律就是，凡是这种口气夸张的项目，从来都是不好用，言过其实的几率是100%。