Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
15.08.2008, 21:43
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от _nic
вообщем надо засунуть текст с таким _http://img388.imageshack.us/my.php?image=77973013xh5.jpg форматированием
RichEdit.
редактируешь, затем сохраняешь файл с расширением rtf
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
15.08.2008, 21:47
|
|
Постоянный
Регистрация: 07.05.2006
Сообщений: 732
Провел на форуме:
7910701
Репутация:
811
|
|
тут такая жопа возникла
нужно сделать на делфи прогу
тупую формочку
где палитра 16 ричного кода цвета
ставиш мышку на нужном цвете а он показывает код цвета
хз как реализовать. Мы в инсте ещё делфи не проходили :d
типа как в фотошопе
Последний раз редактировалось alextoun; 15.08.2008 в 21:50..
|
|
|
|
15.08.2008, 23:32
|
|
Постоянный
Регистрация: 05.05.2006
Сообщений: 743
Провел на форуме:
2982851
Репутация:
107
|
|
Сообщение от W!z@rD
RichEdit.
редактируешь, затем сохраняешь файл с расширением rtf
нельзя.файл должен быть только один то есть exe
|
|
|
|
16.08.2008, 03:24
|
|
Постоянный
Регистрация: 31.01.2008
Сообщений: 643
Провел на форуме:
6128108
Репутация:
445
|
|
И так я хочу создать калькулятор
Задал кнопке событие чтобы оно писало в мое окошечко где все вводиться
Код:
procedure TForm1.but1Click(Sender: TObject);
begin
txtN.Text:='1';
end;
Так он мне выводит в строчку одну единицу а я хочу чтобы было столько единиц скока я нажал на кнопку
Собственно как изменить код чтобы так и было ( как я пожелаю )
И вот я еще с чем столкнулся
Написал событие
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if rad1.Checked:=True then
begin
memo1.Lines.Add(txtA.Text);
txtB.Text(txtA.Text);
txtC.Text(txtA.Text);
end;
end;
Так оно ругаеться
Последний раз редактировалось diznt; 16.08.2008 в 06:22..
|
|
|
|
16.08.2008, 07:51
|
|
Постоянный
Регистрация: 25.05.2007
Сообщений: 448
Провел на форуме:
4226446
Репутация:
1564
|
|
diznt, надо так
Код:
procedure TForm1.but1Click(Sender: TObject);
begin
txtN.Text:='1' + txtN.Text;
end;
и...
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if rad1.Checked then
begin
memo1.Lines.Add(txtA.Text);
txtB.Text(txtA.Text);
txtC.Text(txtA.Text);
end;
end;
Вы в if присваиваите, а это неверно.
Последний раз редактировалось 0x0c0de; 16.08.2008 в 07:57..
|
|
|
|
16.08.2008, 16:32
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от _nic
нельзя.файл должен быть только один то есть exe
работа с ресурсами отменена по дефтолу?!!!!!!!
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
16.08.2008, 16:45
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597
Репутация:
836
|
|
Сообщение от alextoun
тут такая жопа возникла
хз как реализовать. Мы в инсте ещё делфи не проходили :d
типа как в фотошопе
Если я тебя правильно понял:
procedure TForm1.Button1Click(Sender: TObject);
var
rgb: Cardinal;
begin
rgb:=ColorBox1.Selected;
Edit1.Text:=Format('%2x%2x%2x', [GetRValue(rgb), GetGValue(rgb), GetBValue(rgb)]);
end;
на форме:
1. TButton
2. TColorBox
3. TEdit
выбираешь в ColorBox'e цвет
щелкаешь на батон
в Edit'e видишь код
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|
|
18.08.2008, 08:03
|
|
Участник форума
Регистрация: 28.07.2007
Сообщений: 177
Провел на форуме:
274360
Репутация:
5
|
|
как установить иконку в приложении написаном в делфи?
|
|
|
|
18.08.2008, 08:32
|
|
Banned
Регистрация: 13.09.2006
Сообщений: 523
Провел на форуме:
2869410
Репутация:
925
|
|
Project->Options->Application
|
|
|
|
19.08.2008, 00:42
|
|
Постоянный
Регистрация: 05.01.2007
Сообщений: 508
Провел на форуме:
2360904
Репутация:
1393
|
|
Сообщение от zl0y
Project->Options->Application
Или заменить в ресурсах =)
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
