Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> развернуть label на 90 градусов вертикально, развернуть компонент 
:(
    Опции темы
Inbox
Дата 10.6.2007, 18:08 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 42
Регистрация: 3.6.2007

Репутация: нет
Всего: нет
Lable  отображается в качестве размера  (цифры),
размерные линии со стрелками и сама цифра, а может это не так делается?
PM MAIL   Вверх
Sunvas
Дата 10.6.2007, 18:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(Inbox @  10.6.2007,  18:08 Найти цитируемый пост)
Lable  отображается в качестве размера  (цифры),
размерные линии со стрелками и сама цифра, а может это не так делается?

Что за бред? smile 


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
ivan219
  Дата 10.6.2007, 19:33 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Он новарное про это ---> <--------- 100 -----------> и вот это самое дело надо ему повернуть на 90 градусов.




--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
Inbox
Дата 10.6.2007, 21:24 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 42
Регистрация: 3.6.2007

Репутация: нет
Всего: нет
<--------- 100 ----------->  Во! Во! Правильно......я так и хочу smile 
PM MAIL   Вверх
Sunvas
Дата 10.6.2007, 21:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
ivan219, как ты догадался??  smile 
Ну просто рисовать текст на канве. В ДРКБ есть пример вывода текста под углом. Label в этом случае использовать не рекомендуется.


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
Inbox
Дата 10.6.2007, 22:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 42
Регистрация: 3.6.2007

Репутация: нет
Всего: нет
Пользователь вводит размер в EDIT, а он отображается на канве на другой форме.
Сложностей в этом не будет?? программа распазнает текст и перенесет её на канву??
PM MAIL   Вверх
ivan219
  Дата 11.6.2007, 08:48 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Цитата(Sunvas @  10.6.2007,  21:42 Найти цитируемый пост)
ivan219, как ты догадался??

По черчению было 5 smile 
Вот один из вареантов:
Код

procedure TForm1.FormPaint(Sender: TObject);
var
  lf: TLogFont;
begin
 FillChar(lf, SizeOf(lf), 0);
 with lf do
  begin
   // Высота буквы
   lfHeight := 15;
   // Ширина буквы
   lfWidth := 10;
   // Угол наклона в десятых градуса
   lfEscapement := -900;
    // Жирность 0..1000, 0 - по умолчанию
   lfWeight := 0;
   // Курсив
//   lfItalic := 0;
   // Подчеркнут
//   lfUnderline := 1;
   // Зачеркнут
 //  lfStrikeOut := 1;
   // CharSet
   lfCharSet := RUSSIAN_CharSet;
   // Название шрифта
   StrCopy(lfFaceName, 'Ari');
  end;
 with Form1.Canvas do
  begin
   FillRect(ClipRect);
   Font.Handle := CreateFontIndirect(lf);
   TextOut(20, 100, '100'); // Коорденаты вывода текста и сам текст
  end;
end;

Правда не совсеми шрифтами работает

Это сообщение отредактировал(а) ivan219 - 11.6.2007, 09:07


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
Alexeis
Дата 11.6.2007, 09:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459
Оно? http://torry.net/pages.php?id=130


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Inbox
Дата 11.6.2007, 10:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 42
Регистрация: 3.6.2007

Репутация: нет
Всего: нет
ivan219, 
Спсбки, Бум разбираться и кумекать......... smile 
PM MAIL   Вверх
ivan219
  Дата 11.6.2007, 13:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12
Вареант предложенный Alexeis тоже хорош попробуй smile  


--------------------
Мой первый сайт и моя первая программа!!!!!
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0538 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.