Помогите с Дельфи на CBuilder перевести / C++

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / C++ [игнор отключен] [закрыт для гостей] / Помогите с Дельфи на CBuilder перевести

25 сообщений из 35, страница 1 из 2

все

Помогите с Дельфи на CBuilder перевести

#32560955

Обычный_чайник

Гость

Тут увидел как опытные люди давали совет на Дельфи, а я ее самостоятельно не могу на CBuilder перевести.

Может подсобите код очень часто необходимый.

type
THack= class(TControl);

И ты получишь доступ к свойству Color текущего объекта.

if Sender is TControl then THack(Sender).Color := clWhite;

Спасибо

...

Рейтинг:

0 / 0

15.06.2004, 08:35

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561045

MySQLdb

Участник

Сообщения: 421

Рейтинг: 0 / 0

Код: plaintext

1.
2.
3.
4.
5.
6.

class THack : public (TControl);

THack *My;

My = new(THack);

if (Sender is TControl) { My->Sender->Color = clWhite;}

-----------------------------------------------------------
С уважением,MySQLdb

...

Рейтинг:

0 / 0

15.06.2004, 10:13

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561216

Коктейл

Гость

В билдере нет is , зато есть dynamic_cast

Удачи

...

Рейтинг:

0 / 0

15.06.2004, 11:32

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561224

Обычный_чайник

Гость

Не получается что здесь не так?

class THack {public:TControl;};
. . . . .

void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
THack *My;
My = new(THack);

if (dynamic_cast<TControl *> (Sender))
{
My->Sender->Color=clWhite;
}

...

Рейтинг:

0 / 0

15.06.2004, 11:35

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561246

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.

class THack {public:TControl;};
. . . . .

void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
THack *My;
My = new(THack);

if (dynamic_cast<TControl *> (Sender))
{
   dynamic_cast<TControl&> (*Sender)->Color=clWhite;
}

^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

15.06.2004, 11:44

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561338

Обычный_чайник

Гость

Неа ошибку пишет
E2288 Pointer to structure required on left side of -> or ->*

...

Рейтинг:

0 / 0

15.06.2004, 12:24

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561348

Обычный_чайник

Гость

Ой, забыл написать что в следующей строке ошибка, а как правильно написать?

dynamic_cast<TControl&> (*Sender)->Color=clWhite;

...

Рейтинг:

0 / 0

15.06.2004, 12:29

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561365

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

наверное правильней всетаки будет так ...

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.

class THack {public:TControl;};
. . . . .

void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
THack *My;
My = new(THack);

if (dynamic_cast<TControl*>(Sender))
{
  dynamic_cast<THack&>(*Sender)->Color=clWhite;
}

^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

15.06.2004, 12:33

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561379

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

Я так понял , что вы хотите сделать ,
если переходищь на какойто TEdit , то сделать его цвет белым ?

ну и соотвесвенно (если вдруг я понял правильно),
можно сделать так

Код: plaintext

1.
2.
3.
4.
5.
6.
7.

void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
 if (dynamic_cast<TEdit*>(Sender))
   {
       dynamic_cast<TEdit&>(*Sender).Color = clWhite;
   }
}

^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

15.06.2004, 12:39

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561391

Обычный_чайник

Гость

Вот именно что заранее неизвесто что Tedit.
Это может быть и CheckBox1 и Datepicker.

Подскажите плиз.

...

Рейтинг:

0 / 0

15.06.2004, 12:46

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561437

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

Хмм ну тогда только если так ...

void __fastcall TForm1::Edit1Enter(TObject *Sender)
{
if (dynamic_cast<TEdit*>(Sender))
{
dynamic_cast<TEdit&>(*Sender).Color = clWhite;
}
if (dynamic_cast<TCheckBox*>(Sender))
{
dynamic_cast<TCheckBox&>(*Sender).Color = clWhite;
}
...
}

^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

15.06.2004, 13:06

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561459

Обычный_чайник

Гость

Извините, но все эти головные боли были сделаны чтобы не перечислять
все классы объектов.
На Дельфи это выглядит как в начале и никаких проблем.
Может есть аналог но на Билдере?
Можно и switch (case) при худшем случае.
Но обидно если нельзя.

...

Рейтинг:

0 / 0

15.06.2004, 13:14

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561641

Artemkaa

Гость

CBuilder написан на Дельфи поэтому может он и урезанный.

...

Рейтинг:

0 / 0

15.06.2004, 14:19

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32561680

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

Что за глуппости ?

^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

15.06.2004, 14:29

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562199

АлиДуба

Гость

Ну что никто не знает ответ.
Может помучить еще или сразу ответить?

...

Рейтинг:

0 / 0

15.06.2004, 17:15

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562385

Lepsik

Участник

Откуда: glubinka

Сообщения: 4 167

Рейтинг: 0 / 0

2чайник

тебе уже сто раз показали правильный ответ

TControl *ctrl = dynamic_cast<TControl *>(Sender);
if( NULL != ctrl )
ctrl->Color = clWhite;

причем ответ на С++ будет всегда короче и проще чем на дельфи

...

Рейтинг:

0 / 0

15.06.2004, 18:35

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562453

Обычный_чайник

Гость

Спасибо что мозги мне правляете я же чайник,
но и Ваш вылетает с ошибкой. Может по памяти пишите.
Неужели нет под рукой билдера?
Спасибо буду ждать еще, может кто пояснит.
:(

CBuilder5
E2247 'TControl::Color' is not accessible

...

Рейтинг:

0 / 0

15.06.2004, 19:28

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562500

334455

Гость

Слушай замучил ты всех.
Читай книжки.

Попробуй результат dynamic_cast(...) сохранить. в аа например
аа = dynamic_cast(...) ;
аа->Color=бэлий

...

Рейтинг:

0 / 0

15.06.2004, 20:01

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562513

Обычный_чайник

Гость

Получается никто не знает ответа.
В дельфи запроста, а здесь ни хрена.

...

Рейтинг:

0 / 0

15.06.2004, 20:24

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562580

Обычный_чайник

Гость

Сдаюсь, вот окончательно, больше ничего не получается.

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.

void __fastcall TForm1::Edit1Enter(TObject *Sender)
{

if (dynamic_cast<TEdit*>(Sender))
   ((TEdit*)Sender)->Color=clYellow;

if (dynamic_cast<TCheckBox*>(Sender))
   ((TCheckBox*)Sender)->Color=clYellow;

}
// ---------------------------------------------------------------------------
 
void __fastcall TForm1::Edit1Exit(TObject *Sender)
{
if (dynamic_cast<TEdit*>(Sender))
   ((TEdit*)Sender)->Color=clWhite;

if (dynamic_cast<TCheckBox*>(Sender))
   ((TCheckBox*)Sender)->Color=clWhite;

...

Рейтинг:

0 / 0

15.06.2004, 21:50

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32562588

Lepsik

Участник

Откуда: glubinka

Сообщения: 4 167

Рейтинг: 0 / 0

не должно вылетать с ошибкой. все у тебя написано правильно.

Я так весьма регулярно делаю

...

Рейтинг:

0 / 0

15.06.2004, 22:05

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32563090

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

2Lepsik
да просто у класса TControl нету метода color

^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

16.06.2004, 11:10

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32564483

АБВГДЭЮЯ

Гость

Не метод, а свойство.
Пробовал код под Дельфи все катит. На билдере глючит.
Значит ребята из Борланда что то намудрили.
Странно.

...

Рейтинг:

0 / 0

16.06.2004, 20:58

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32565051

ну я

Участник

Откуда: Москва

Сообщения: 1 270

Рейтинг: 0 / 0

Намекаю: SetOrdProp

...

Рейтинг:

0 / 0

17.06.2004, 11:57

| Ответить | Цитировать | Написать

Помогите с Дельфи на CBuilder перевести

#32565216

JibSkeart

Участник

Откуда: Из далекой галактики

Сообщения: 18 930

Рейтинг: 0 / 0

2АБВГДЭЮЯ
угу оговорился :)
^{ш

(';')

(V),(V),,}

Код: plaintext

JS

...

Рейтинг:

0 / 0

17.06.2004, 13:02

| Ответить | Цитировать | Написать

25 сообщений из 35, страница 1 из 2

все

Форумы / C++ [игнор отключен] [закрыт для гостей] / Помогите с Дельфи на CBuilder перевести

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=57&fpage=429&tid=2034252]:	0ms
get settings:	6ms
get forum list:	11ms
check forum access:	2ms
check topic access:	2ms
track hit:	23ms
get topic data:	7ms
get forum data:	2ms
get page messages:	38ms
get tp. blocked users:	1ms
others:	204ms

total:	296ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы