RichEdit

@Garic_ · Регистрация: 03.11.2009

Студворк — интернет-сервис помощи студентам

\\Надо получить в одной строке два значения (№счёт и через пробел значение переменой х)
При нажатии Button2

C++
1
2
3
int i++;
int x = 100;
RichEdit1->Lines->Add(i.x);//Add(i.x) не знаю как правильно.

@gorin · 06.02.2010, 19:02

sh4d°_°ff, а что делать в етом случае

Добавлено через 2 минуты
sh4d°_°ff, может нужно оглашать едеты const float?

sh4d°_°ff · 06.02.2010, 19:27

нет, если я оказался прав, то наверно стоит или заменить пустое место на 0 или поставить условие при присваивании типа... мм...

C++
1
2
3
4
5
6
7
8
if (LabeledEdit1->Text!="")
{
float m=StrToFloat(LabeledEdit1->Text);
}
if (LabeledEdit2->Text!="")
{
float d=StrToFloat(LabeledEdit2->Text);
}

так же стоит, думаю, (но тебе виднее) запретить в эьти едиты нецифры код такой:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
if ((Key >= '0') && (Key <= '9')) // öèôðû
{
return;
}
else if ((Key == '.') || (Key == ',')) // çàïÿòàÿ
        {
        if (((TEdit*)Sender)->Text.Pos(DecimalSeparator)!=0) // åñëè çàïÿòàÿ óæå åñòü
                Key = 0;
        else // åñëè åù¸ íåò
                Key = DecimalSeparator;
        }
else Key = 0; // íå öèôðà
}

это как, думаю ты понимаешь, втыкается на onKeyPress нужного Edit'a (в примере с Edit1)

@gorin · 06.02.2010, 19:34

sh4d°_°ff, У меня к тебе вопросик может ти знаеш как так можно зделать. Может ти знаеш как можно запрограмировать едети так чтоби я например вводил один ыз них какоето чесло а в остальних виводило результат остальних велечи. Вот чтото типа такого http://alpha-610.narod.ru/trance.html

sh4d°_°ff · 06.02.2010, 19:56

нуу... за тебя я писать не буду... но алгоритм прост... примерно такой как в приведенном тобой выше коде... все правильно.. смотри допустим для трех типов данных... условно.. во первых, если ты хочешь "как там", что было бы разумно, то на onClick для Edit'ов ставишь код типа

C++
1
2
3
4
5
void __fastcall TForm1::Edit1Click(TObject *Sender)
{
Edit2->Text=""; //обнуляем остальные
Edit3->Text="";
}

потом основное будет типа того:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
void __fastcall TForm1::Button1Click(TObject *Sender)
{
float a1, a2, a3;
if (Edit1->Text!="")
{
a1=StrToFloat(Edit1->Text);
a2=a1*123123;
a3=a1*21222;
Edit1->Text=a1;
Edit2->Text=a2;
Edit3->Text=a3;
}
else if (Edit2->Text!="")
{
a2=StrToFloat(Edit2->Text);
a1=a2*123123;
a3=a2*21222;
Edit1->Text=a1;
Edit2->Text=a2;
Edit3->Text=a3;
}
else if (Edit3->Text!="")
{
a3=StrToFloat(Edit3->Text);
a2=a2*123123;
a1=a2*21222;
Edit1->Text=a1;
Edit2->Text=a2;
Edit3->Text=a3;
}
else ShowMessage("Введи число, злобный ахтунг!!!!");
}

ну думаю понятно.. домножаешь на нужное число и все... ну как типа в килограмме 1024гр, т.е если a1 - граммы, а a2 - килограммы то мы делаем a1=a2*1024... все просто, gorin, только нужно чуть чуть подумать))

@gorin · 07.02.2010, 12:39

sh4d°_°ff, Большое спасибо вишло так как я хотел!!!!!!

Добавлено через 15 часов 20 минут
Прива пацани, у меня такой вопрос можно както обекта Shape1 выбрать форму трикутника?
А то я там пересмотрел трикуника нету!!!!!

sh4d°_°ff · 07.02.2010, 13:14

если не ошибаюсь то нет

@gorin · 09.02.2010, 20:49

Ребята как можно написать бота к игре крестикам-ноликам?
Вот код игры крестики нолики я хочу запрогамировать туда типа проверки чтобы комп играл со мной (штучный интелект)

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
void __fastcall TForm1::a1Click(TObject *Sender)
{
int diya=1;
dynamic_cast<TSpeedButton*>(Sender)->Enabled=false;
if ((diya%1==0)&&(diya%2==0)){
dynamic_cast<TSpeedButton*>(Sender)->Caption="O";
dynamic_cast<TSpeedButton*>(Sender)->Tag=2;}
else{
dynamic_cast<TSpeedButton*>(Sender)->Caption="X";
dynamic_cast<TSpeedButton*>(Sender)->Tag=1;}
diya++;
AnsiString name=dynamic_cast<TSpeedButton*>(Sender)->Name;
if(name=="a1"||name=="a2"||name=="a3"){
if((a1->Tag==a2->Tag)&&(a2->Tag==a3->Tag))
Image1->Visible=true;}
if(name=="a4"||name=="a5"||name=="a6"){
if((a4->Tag==a5->Tag)&&(a5->Tag==a6->Tag))
Image1->Visible=true;}
if(name=="a7"||name=="a8"||name=="a9"){
if((a7->Tag==a8->Tag)&&(a8->Tag==a9->Tag))
Image1->Visible=true;}
if(name=="a1"||name=="a4"||name=="a7"){
if((a1->Tag==a4->Tag)&&(a4->Tag==a7->Tag))
Image1->Visible=true;}
if(name=="a2"||name=="a5"||name=="a8"){
if((a2->Tag==a5->Tag)&&(a5->Tag==a8->Tag))
Image1->Visible=true;}
if(name=="a3"||name=="a6"||name=="a9"){
if((a3->Tag==a6->Tag)&&(a6->Tag==a9->Tag))
Image1->Visible=true;}
if(name=="a1"||name=="a5"||name=="a9"){
if((a1->Tag==a5->Tag)&&(a5->Tag==a9->Tag))
Image1->Visible=true;}
if(name=="a3"||name=="a5"||name=="a7"){
if((a3->Tag==a5->Tag)&&(a5->Tag==a7->Tag))
Image1->Visible=true;}
}

@gorin · 12.02.2010, 19:36

sh4d°_°ff, Привет подскажи как можно чтоби комп ставил свой ход!! А то чтото не как додуматса не могу!!!

sh4d°_°ff · 13.02.2010, 07:36

gorin, я тебе код кинуть не могу (т.к. нету и писать некогда и лень).. но ссылочкой поделюсь:

http://ru.wikipedia.org/wiki/%... 0%BA%D0%B8

алгоритм реализуется через if else... короче все очень просто =)
кстати вот тебе кресты с тупым АИ.. мб пригодятся:

@gorin · 17.02.2010, 20:09

sh4d°_°ff, прива, спасибо за ссылку и за архив.

Добавлено через 5 минут
sh4d°_°ff, Слышеш может ты знаеш книжки где там есть игра Крестики нолики на С Builder 6?

sh4d°_°ff · 17.02.2010, 20:13

неа.. у меня таких книжек нет.. в интернете полно всякого видел.. а так не знаю

@gorin · 17.02.2010, 20:16

sh4d°_°ff, Мне нужно розобратса как именно бот пишетса, и у меня же крестики нолики с кнопками, а чтобы нормально розобратса нужно чтобы хтото обяснил или просто литературу почетать!!!

@gorin · 26.02.2010, 22:53

Пответ всем, у меня проблемка одна есть!!! Я пишу прогу про фигури алгибротческие. Круг и квадрат. Для того чтобы написать эту прогу я использую Обекти Image. Также я использую еще 3 обекта ComboBox, SpeedButton и LabeledEdit. Прога у меня работает только с одной функцией Ресует Квадрат в круге, а когда я вставляю второй обект Image только в него вставляю вторую картинку чтобы рисовало Круг в квадрате. При компиляции ошибки нету, а когда идет самий процес рисования второго Image выбивает ошибку!!!

Добавлено через 14 минут
Вот код:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton1Click(TObject *Sender)
{
const float a=StrToFloat(LabeledEdit2->Text);
const float r=StrToFloat(LabeledEdit1->Text);
switch(ComboBox1->ItemIndex) {
case 0:
Image1->Visible=true;
Image1->Width=r*2;
Image1->Height=r*2;
break;
case 1:
Image2->Visible=true;
Image2->Width=a;
Image2->Height=a;
break;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
switch(ComboBox1->ItemIndex){
case 0:
LabeledEdit1->Visible=true;
break;
case 1:
LabeledEdit2->Visible=true;
break;
}
}
//---------------------------------------------------------------------------

Добавлено через 1 минуту
sh4d°_°ff, Я уже ту прогу дописал учень круто вышло, могу кинуть посмотриш!!!!! (Конвектор валют, растояния и обьема)

Добавлено через 6 минут
Вота ошибка:
<img str="http://p23a.at.ua/ZTK_P33-A/14554.png">

Добавлено через 2 минуты
Вот ошыбка:
<IMG SRC="http://p23a.at.ua/ZTK_P33-A/14554.png">

Добавлено через 13 секунд
Вот ошыбка:
[IMG SRC="http://p23a.at.ua/ZTK_P33-A/14554.png"]

Добавлено через 15 секунд
Вот ошыбка:
http://p23a.at.ua/ZTK_P33-A/14554.png

Добавлено через 3 минуты
А вот скриншот проги:
http://p23a.at.ua/ZTK_P33-A/32354.png

Добавлено через 4 минуты
http://p23a.at.ua/ZTK_P33-A/345410.png

@NiTan · 27.02.2010, 11:21

Ошибка вот здесь:

C++
1
const float a=StrToFloat(LabeledEdit2->Text);

Скорее всего в LabeledEdit2->Text записанно не число, и поэтому StrToFloat() не может конвертировать текст в число. А судя по ошибке в LabeledEdit2->Text вообще нет текста.

@gorin · 27.02.2010, 17:34

А что тогда делать, как устранить ошибку?

@NiTan · 27.02.2010, 18:10

Сделать так, чтобы в LabeledEdit2->Text было записанно число.

@gorin · 27.02.2010, 18:19

Я вот програмировал з одним Image у меня ошибок не выбивало. Вот например я ставлю на форму LabeledEdit1 Кнопку="Нарисовать" и Image з картинкой Круг в квадрате. И просто забираю значение из LabeledEdit1 которое равно а, и програмирую так чтобы это число размери Image. Вот такойто принцып. С одним Image работает ну когда я всталяю второй Image ну чтоби уже рисовало квадрат в круге при этом задавая радиус круга, и у меня выбивает ошибка, ошибка привидена выше.......

@mik-a-el · 27.02.2010, 18:21

Каждому вопросу - отдельная тема.

Новые блоги и статьи Все статьи Все блоги /
Про "Windows must die!" kumehtar 04.11.2026 Знаете, чет накатило. . . . Когда-то это было почти боевым кличем: мол, нормальный человек сидит на DOS, OS/ 2 или Linux, а вот это вот - Must Die. А теперь человек произносит «мастдай» с усмешкой - и. . .	Красочные поля с номером страницы svg+background-image russiannick 04.11.2026 Красочные поля с номером страницы не менее важны чем в эпоху бумажных книг. Посему спешу представить почтеннейшей публике этот важный инструмент который эти поля и формирует. В процессе разработки. . .	Вступаем в новую фазу генерации favicons, векторную. russiannick 02.11.2026 Теперь нет нужды скрывать что используется простой svg. Исходный код изображения помещаем в поле и жмем кнопку. Исходник преобразуется в вид корректный для помещения в favicon или в url(). Нажатие. . .	Генератор паролей (вариант №4) Maks 01.11.2026 После публикации 3-го варианта генератора паролей, разослал его своим коллегам (с целью оценки), в итоге были получены следующие рекомендации: 1. Вернуть возможность использования знаков \| 1 l I;. . .
Генератор паролей (вариант №3) Maks 30.10.2026 Финальная версия генератора паролей 1С. Доработка решения в этот раз коснулась только визуальной части, а именно, добавлен реквизит ДопПараметры (тип Булево), который скрывает/ отображает реквизиты:. . .	Магическое мышление и магия, современная наука не отличима от магии (говорит ИИ Джемени) zorxor 30.10.2026 Джемени, расскажи, пожалуйста, что такое магическое мышление, что такое магия, почему современная наука чем-то напоминает магию? Фраза «Любая достаточно развитая технология неотличима от магии». . .	За какое время ИИ может подобрать пароль по хешу (рассказывает Джемени ИИ) zorxor 30.10.2026 Расскажи, Джемени, если известен хэш МД5, например, за сколько ИИ сможет подобрать соответствующий пароль? Искусственный интеллект (ИИ) может подобрать простой или средний по сложности пароль по. . .	Кто убил Suno? Почему наше солнышко погасло? (диалог с ИИ Джемени) zorxor 30.10.2026 Как убивали Suno. Хронология. «Убийство» музыкальной нейросети Suno — это затяжной процесс, в котором технологический хайп стартапа разбился о жесткую реальность судебных исков от гигантов. . .

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	06.02.2010, 19:02
	sh4d°_°ff, а что делать в етом случае Добавлено через 2 минуты sh4d°_°ff, может нужно оглашать едеты const float? 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	06.02.2010, 19:34
	sh4d°_°ff, У меня к тебе вопросик может ти знаеш как так можно зделать. Может ти знаеш как можно запрограмировать едети так чтоби я например вводил один ыз них какоето чесло а в остальних виводило результат остальних велечи. Вот чтото типа такого http://alpha-610.narod.ru/trance.html 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	07.02.2010, 12:39
	sh4d°_°ff, Большое спасибо вишло так как я хотел!!!!!! Добавлено через 15 часов 20 минут Прива пацани, у меня такой вопрос можно както обекта Shape1 выбрать форму трикутника? А то я там пересмотрел трикуника нету!!!!! 0

sh4d°_°ff говнокодер 1273 / 297 / 35 Регистрация: 31.10.2009 Сообщений: 1,432
	07.02.2010, 13:14
	если не ошибаюсь то нет 1

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	12.02.2010, 19:36
	sh4d°_°ff, Привет подскажи как можно чтоби комп ставил свой ход!! А то чтото не как додуматса не могу!!! 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	17.02.2010, 20:09
	sh4d°_°ff, прива, спасибо за ссылку и за архив. Добавлено через 5 минут sh4d°_°ff, Слышеш может ты знаеш книжки где там есть игра Крестики нолики на С Builder 6? 0

sh4d°_°ff говнокодер 1273 / 297 / 35 Регистрация: 31.10.2009 Сообщений: 1,432
	17.02.2010, 20:13
	неа.. у меня таких книжек нет.. в интернете полно всякого видел.. а так не знаю 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	17.02.2010, 20:16
	sh4d°_°ff, Мне нужно розобратса как именно бот пишетса, и у меня же крестики нолики с кнопками, а чтобы нормально розобратса нужно чтобы хтото обяснил или просто литературу почетать!!! 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	27.02.2010, 17:34
	А что тогда делать, как устранить ошибку? 0

@NiTan Покинул форум 3189 / 1368 / 109 Регистрация: 29.01.2010 Сообщений: 2,887
	27.02.2010, 18:10
	Сделать так, чтобы в LabeledEdit2->Text было записанно число. 1

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	27.02.2010, 18:19
	Я вот програмировал з одним Image у меня ошибок не выбивало. Вот например я ставлю на форму LabeledEdit1 Кнопку="Нарисовать" и Image з картинкой Круг в квадрате. И просто забираю значение из LabeledEdit1 которое равно а, и програмирую так чтобы это число размери Image. Вот такойто принцып. С одним Image работает ну когда я всталяю второй Image ну чтоби уже рисовало квадрат в круге при этом задавая радиус круга, и у меня выбивает ошибка, ошибка привидена выше....... 0

@mik-a-el Администратор 88013 / 53334 / 249 Регистрация: 10.04.2006 Сообщений: 13,784
	27.02.2010, 18:21
	Каждому вопросу - отдельная тема. 1