Форум: "Компоненты";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Вниз

ПОМОГИТЕ НАЙТИ КОМПОНЕНТ!   Найти похожие ветки 

← →
Maxim-13   (2006-07-11 11:43) [0]

Уважаемые мастера! не подскажите где можно скачать компонент наследник TEdit для Делфя 7 с возможностью вставлять в него графическую информацию ?

---

← →
tesseract ©   (2006-07-11 11:59) [1]

RichEdit?

---

← →
AbrosimovA ©   (2006-07-11 14:16) [2]

К примеру, так:

var Image: TImage;

procedure TForm1.FormShow(Sender: TObject);
var margin: integer;
begin
margin:=17;
SendMessage(Edit1.Handle, EM_SETMARGINS, EC_LEFTMARGIN, MakeLong(margin,0));
Image:=TImage.Create(Self);
Image.Parent:=Edit1;
ImageList1.GetBitmap(0,Image.Picture.Bitmap);
end;

---

Страницы: 1 вся ветка

Форум: "Компоненты";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.043 c