ACL (API Controls Library)

[kiloz]

Возникла тут необходимость написания маленьких программ, а самые маленькие программы получаются если использовать WinAPI вместо VCL. Нашел на просторах интернета библиотку ACL, но в ней только базовые компоненты. Написать несколько новых компонентов на её основе не составило труда, но только не комбинированных. Вопрос: как создать комбинированный Edit с Button, Button должен быть внутри Edit и распологаться по правому краю. Я пытался создать такой компонент, но у меня возникла ошибка создания окна из-за того что я наследовал его от Edit, а потом изменил имя класса окна. Если не менять имя класса, то ошибка возникает при создании вложенного Button. Помогите разобраться.

Вот библиотека (acl2.zip), и изменненный файл ACL.pas (MyACL.zip) - с моим проблемным TEditButton, а так же тестовый пример с его использованием:

[Д'якон]

Лучше используй WinApi без всяких библиотек

[kiloz]

Это всего лишь надстройка над WinAPI для удобства... да и понятно как обращаться к подчиненным компонентам и родительским...

А если на чистом WinAPI писать то:
1) как сделать окно по BITMAP из ресурсов?
2) как сделать подобный EditButton компоненты, что бы при редактировании Edit-а вложенный Button не исчезал до приобретения фокуса?

PS И все же как исправить ошибку в моем EditButton?

[bohdant]

Почему бы тебе не попробовать библиотеку KOL
http://kolmck.net/rindex.htm
Там есть куча примеров и документации

[Showy]

Простой пример создания кнопки в едите:

var
  EditH: HWND;
  BtnH: HWND;
begin
  EditH := CreateWindow('EDIT', 'Edit', WS_CHILD, 0, 0, 75, 15, Handle, 0, HInstance, 0);
  Windows.SetParent(EditH, Handle);
  BtnH := CreateWindow('BUTTON', '...', WS_CHILD, 60, 0, 15, 15, Handle, 0, HInstance, 0);
  Windows.SetParent(BtnH, EditH);
  showwindow(EditH, SW_SHOW);
  showwindow(BtnH, SW_SHOW);