Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.12.2013, 16:11   #1
glazik
Пользователь
 
Аватар для glazik
 
Регистрация: 03.03.2011
Сообщений: 80
По умолчанию Мелкие вопросы

Доброго времени!

1) Подскажите, плиз, как сделать форму постоянно активной, а то у меня иногда (не всегда) при переходе с формы на форму (если открыты еще какие нибудь программы, браузер например) активным становится не мой проект, а то что было открыто до этого (как будто я альтаб нажал).
2) Как изменить стандартную иконку делфи проекта на свою (та иконка которая отображается на екзешнике)?

Заранее спасибо!
glazik вне форума Ответить с цитированием
Старый 15.12.2013, 16:40   #2
beegl
instagram
Участник клуба
 
Аватар для beegl
 
Регистрация: 24.05.2008
Сообщений: 1,451
По умолчанию

1. сделать форму постоянно активной, можно в таймере, с интервалом 100-300
Код:
SendMessage(Application.MainForm.Handle, WM_NCACTIVATE, 1, 0);
2.изменить стандартную иконку - ищите в меню Project -> Options.. -> Application - заменяем иконку
beegl вне форума Ответить с цитированием
Старый 15.12.2013, 17:10   #3
glazik
Пользователь
 
Аватар для glazik
 
Регистрация: 03.03.2011
Сообщений: 80
По умолчанию

Можно немного подробнее первый пункт, я так понимаю, что нужно будет еще таймер на форму добавлять и что значит 100-300?
glazik вне форума Ответить с цитированием
Старый 15.12.2013, 17:21   #4
beegl
instagram
Участник клуба
 
Аватар для beegl
 
Регистрация: 24.05.2008
Сообщений: 1,451
По умолчанию

100-300 значит интервал?
beegl вне форума Ответить с цитированием
Старый 15.12.2013, 17:51   #5
glazik
Пользователь
 
Аватар для glazik
 
Регистрация: 03.03.2011
Сообщений: 80
По умолчанию

Спасибо)))))

Еще 1 маленький вопрос:
Как в label выводит надстрочный и подстрочный текст?) и спец символы типа лямбда и тому подобных?)
glazik вне форума Ответить с цитированием
Старый 15.12.2013, 18:18   #6
Winexcel
Форумчанин
 
Регистрация: 26.08.2013
Сообщений: 187
По умолчанию

Цитата:
Сообщение от glazik Посмотреть сообщение
Спасибо)))))

Еще 1 маленький вопрос:
Как в label выводит надстрочный и подстрочный текст?) и спец символы типа лямбда и тому подобных?)
Думаю, следует использовать
Canvas.TextOut и Canvas.Font
Winexcel вне форума Ответить с цитированием
Старый 15.12.2013, 20:40   #7
beegl
instagram
Участник клуба
 
Аватар для beegl
 
Регистрация: 24.05.2008
Сообщений: 1,451
Лампочка

Цитата:
Сообщение от glazik Посмотреть сообщение
Как в label выводит спец символы типа лямбда и тому подобных?)
поменять свойство надо Label1.Font.Charset := GREEK_CHARSET;
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  Label1.Font.Charset := GREEK_CHARSET;
  Label1.Caption := '';
  for i:= 913 to 969 do
    Label1.Caption := Label1.Caption + Chr(i);
end;
end.

Последний раз редактировалось beegl; 15.12.2013 в 21:20. Причина: заменил код, экспериментируйте
beegl вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Мелкие, но хитрые задачи - Срочно. Aquasonick Фриланс 2 09.12.2013 18:37
Мелкие вопросы arahis Помощь студентам 16 10.10.2011 22:24
Разбить большой файл на более мелкие Sat_Kelman Microsoft Office Excel 4 18.03.2011 13:06
мелкие Ошибки в коде T@tali Паскаль, Turbo Pascal, PascalABC.NET 10 10.01.2011 21:55
мелкие вопросы по эксель nar1979 Microsoft Office Excel 2 18.03.2009 00:08