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

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

Спец. символы


Мурзилка ©   (2006-05-19 08:40:00) 

Надо на экран вывести одним символом знаки:
1)Стрелочка что-то вроде такого ->, только одним символом.
2)Штопор - если взять букву "Т" и повернуть её влево на 90 градусов.
3)уголок - что то вроде (ну если у квадрата убрать левое и нижнее ребро, вот такой уголок и нужен)


Мурзилка   (2006-05-19 18:42:00) [1]


> странно у меня все работает
> Edit1.Font.Name:='Terminal';
> Edit1.Text:=chr(26)+chr(195)+chr(191)+' PRIMER kodirovki';
>

хммм, ну вот точно так же делаю и нифига


Хельг   (2006-05-19 16:27:00) [2]


> Мурзилка   (19.05.06 16:23) [15]
> а почему это только в лэйбэле работает? пытаюсь вывестив
>  Edit и там уже другие символы

странно у меня все работает
Edit1.Font.Name:='Terminal';
Edit1.Text:=chr(26)+chr(195)+chr(191)+' PRIMER kodirovki';


Мурзилка   (2006-05-19 16:23:00) [3]


>
> Label1.Font.Name:='Terminal';
> Label1.Caption:=chr(26)+chr(195)+chr(191)+' PRIMER kodirovki';
>
>
> ЗЫ: с кирилицей был не прав

а почему это только в лэйбэле работает? пытаюсь вывестив  Edit и там уже другие символы


Хельг   (2006-05-19 16:20:00) [4]


> Мурзилка   (19.05.06 16:09) [13]
> что-то я не нашел кодировки, где есть одновременно латиница,
>  стрелочкА, штопор и уголок


Label1.Font.Name:='Terminal';
Label1.Caption:=chr(26)+chr(195)+chr(191)+' PRIMER kodirovki';


ЗЫ: с кирилицей был не прав


Мурзилка   (2006-05-19 16:09:00) [5]

что-то я не нашел кодировки, где есть одновременно латиница, стрелочкА, штопор и уголок


Чапаев   (2006-05-19 14:16:00) [6]


> а также и кирилица

Только в кодовой странице cp866, а не cp1251.


Мурзилка   (2006-05-19 09:26:00) [7]


> Вот как раз в 'Terminal' они и присутствуют, а также и кирилица
> ЗЫ: посмотри в "Пуск->Стандартные->Служебные->Таблица символов"


спасибо


Хельг   (2006-05-19 09:24:00) [8]


> Мурзилка   (19.05.06 09:20) [8]
> а, вот есть какой либо шрифт, где присутствует и латинскаий
> алфавит и эти символы?


Вот как раз в 'Terminal' они и присутствуют, а также и кирилица
ЗЫ: посмотри в "Пуск->Стандартные->Служебные->Таблица символов"


Gydvin   (2006-05-19 09:23:00) [9]

в командной строке

charmap.exe


Мурзилка   (2006-05-19 09:20:00) [10]

а, вот есть какой либо шрифт, где присутствует и латинскаий алфавит и эти символы?


Хельг   (2006-05-19 09:15:00) [11]


procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Font.Name:='Terminal';
Label1.Caption:=chr(26)+chr(195)+chr(191);
end;


palva   (2006-05-19 09:12:00) [12]

Подобрать какой-нибудь подходящий шрифт.


Мурзилка   (2006-05-19 09:06:00) [13]


>
> >ну а как эти символы вывести?
>
> На канве отрисуй линиями


надо именно символом - одним.


Gydvin   (2006-05-19 09:05:00) [14]

procedure TForm1.Button1Click(Sender: TObject);
begin
canvas.font.Name:='Wingdings 3';
canvas.Font.Size:=30;
canvas.TextOut(10,10,chr(97));
end;


Elen   (2006-05-19 09:04:00) [15]


>ну а как эти символы вывести?

На канве отрисуй линиями


Мурзилка   (2006-05-19 08:56:00) [16]

ну а как эти символы вывести?
ну вот к примеру 2) пункт хотя бы.


Весёлые картинки   (2006-05-19 08:53:00) [17]

... и что мешает ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо