| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Размер текста [D6, WinXP]

Homa_Programer ©   (2005-02-02 23:22:00) 

Как узнать сколько символов например "+" влезет в текстовый редактор (будь то TMemo, TRichEdit, TEdit и т.д.)
помогите...

---

Homa_Programer   (2005-02-04 23:48:00) [1]

> Ega23 ©
благодарю за понятливость и за решение,
просто я не знал как это еще описать :-(

---

Ivolg   (2005-02-03 10:14:00) [2]

Мож автор имеет ввиду это:

label1.Caption:='Символ '+inttostr(memo1.CaretPos.X);
label2.Caption:='Строка '+inttostr(memo1.CaretPos.Y);

---

Ega23   (2005-02-03 09:51:00) [3]

Я кажется понял, что автор имеет ввиду...
TCanvas.TextWidth

This project requires a TPageControl and several TTabPages. To add new pages, right click the TPageControl and select "New Page".
During the form creation the width and height of all tabs on the Page Control becomes double the largest previous value.  So if there are three tabs with captions that are 12, 23 and 19 characters long, the TabWidth would be the number of pixels required to fit 46 characters.

procedure TForm1.FormCreate(Sender: TObject);

var
 i: Integer;
begin
 with PageControl1 do
 begin
   for i := 0 to PageCount - 1 do
   begin
     if (Canvas.TextWidth(Pages[i].Caption) * 2) > TabWidth then
       TabWidth := Canvas.TextWidth(Pages[i].Caption) * 2;
     if (Canvas.TextHeight(Pages[i].Caption) * 2) > TabHeight then
       TabHeight := Canvas.TextHeight(Pages[i].Caption) * 2;
   end;

 end;
end;

---

Александр Иванов   (2005-02-03 09:37:00) [4]

Homa_Programer ©   (03.02.05 9:27) [3]
См. [1].

---

Neznaika   (2005-02-03 09:32:00) [5]

Положи на форму Мемо, нажми на F9, придави чем-нибудь клавишу '+' и пойди покури, а потом примерно посчитаешь...

:o)

---

Homa_Programer   (2005-02-03 09:27:00) [6]

а теперь подскажите как узнать количество симлов, которое может влезть в одну строчку?

---

SergP   (2005-02-03 01:38:00) [7]

>  Homa_Programer ©   (02.02.05 23:22)
> Как узнать сколько символов например "+" влезет в текстовый
> редактор (будь то TMemo, TRichEdit, TEdit и т.д.)
> помогите...


TMemo - около  50 Кб
TRichEdit - 2 Гб
TEdit - х/з

---

Anatoly Podgoretsky   (2005-02-02 23:32:00) [8]

2 гигабайта, кроме и т.д.

---

Наверх