Фидошник игpает в Поле Чудес, на табло: ***
Якубович читает задание:
- Часть тела
Фидошник сpазу:
- Hога!
- Hо ведь в задании только тpи буквы...
- :-/ а я думал у вас H не настpоена.
var
c: shortint;
s: string;
begin
s := 'A';
with DBNavigator1 dofor c := 0 to ControlCount - 1 doif Controls[c] is TNavButton thenwith TNavButton(Controls[c]) dobegin
ListBox1.Items.Add(Name);
Glyph := nil;
Caption := s;
Inc(s[1]);
end;
end;
Статья DBNavigator без иконок раздела Компоненты и Классы TDBNavigator может быть полезна для разработчиков на Delphi и FreePascal.
Комментарии и вопросы
Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.