Парочка вопросов. Заранее спасибо.
1. Моно ли в поле Memo обращаться к отдельной букве? Если нет то как считать код с файла,
например txt-ишного, и, взависимости от того что там, что-то делать?
2. Как в StrinGrid дать возможность регулировать её размер пользователю.
Возможно лучше открыть таблицу в новом окне, но как?

1: Memo->Lines->Text[index]
2: поставь Align в alClient

1.Написал вот такую штуку для заполнения таблицы, где \n конец строки,а }- конец столбца
и выдаёт при заполнении ошибку, указывая на dstring.h. Я думаю ошибка где-то здесь
int i=0,j=0; char q[100];
for(i=0;i<kol_str;i++)
{
while((q[a]!='\n') || (j<kol_stol))
{
while(q[a]!='}') q[a]=Memo1->Lines->Text[a++];
StringGrid1->Cells[i][j]=q;
j++; a++;
}
}
2. Спасибо, просто у меня ни книг, ни чо нету по Билдеру, приходится тыкать куда попало. Одного знакомого уже достал спрашивать вот и решил в инет заглянуть.

не знаю что такое a ( объявления нет ) и чему оно равно, но скорее всего равно оно 0 ( в начальный момент ) а индексация у AnsiString идет с 1

Понятно. Теперь нашёл ещё одну ошибку, но думаю справлюсь.

Aannttoonn, в качестве спасательного круга могу дать книжку Архангельского (или если есть возможность скачай сам).

Возможности, всмысле денег, нету. Но я очень хочу. Слышал что это самая толковая книга по Борланду. Можешь кинуть на [email protected] пожалуйста если есть электронный вариант?(или где найти)

Большое спасибо. Качаю. Потом буду читать. Круто! Ещё раз спасибо.

Смотрите пишу простую программу:

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

int o=1;
OpenDialog1->Execute();
Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
do Memo2->Lines->Text[o]=Memo1->Lines->Text[o++];
while(Memo1->Lines->Text[o]!='}');
}

там должен загрузится файл с текстом оканчивающийся тогда когда найдётся }, но прога выдаёт ошибку. Скоко уже бьюсь, что за ерунда, Похоже я в этом деле нуб последний, если сегодня не найду ошибку, перейду на Делфи.

sexton-с моей почты, блин, не качаются учебники, пишет докачка не поддерживается. Одно расстройство с этим Билдером.

а не проще ли найти первое вхождение:
int pos = Memo1->Lines->Text.Pos('}');
а потом добавить этот текст:
Memo2->Lines->Add(Memo1->Lines->Text.SubStr(1, pos));

Найди книжку в инете и скачай, ссылки на форуме есть.

Жуткий глюк или чё. Пишу
float a=0.0001;
Edit1->Text=a;
Выводит в Edit1:
9,99999974737875E-5
Объясните кто знает.

FloatToStr(a) тебе в руки

Пробовал. Не катит.
Добавлено @ 13:07
hunter-
Memo2->Lines->Add(Memo1->Lines->Text.SubStr(1, pos));
означает типа вывести текст до первого нахождения '}'
или зачем тогда единица. И как сделать вывод текста от первого до второго вхождения. Спасибо!

Цитата

означает типа вывести текст до первого нахождения '}'

да.

Цитата

И как сделать вывод текста от первого до второго вхождения.

предварительно удалить текст до первого вхождения

Весело. Попробую.

Помоему функции StrToFlot и FloatToStr сдецл глючные.

А как ты хотел?

Я хотел очень точно считать,а они, понимаешь ли, правильно не работают когда числа очень маленькие. Вот не знаю теперь как переводить из Str во Float.

Цитата(Aannttoonn @ 13.12.2005, 19:37)

Помоему функции StrToFlot и FloatToStr сдецл глючные.

Господа. А что Вы хотели? Чем простите, отличаются два числа?
0.0001 и 9,99999974737875E-5. Вы машине хотя бы то скажите как вам нужно выводить

Код

float a=0.0001; Edit1->Text=Format("%.4f", ARRAYOFCONST((a)) ); Edit2->Text=AnsiString::FloatToStrF( a, ffFixed, 10, 4)

А как считать a с Edit1

Код

float a = Edit1->Text.ToDouble();

Vyacheslav не получается!

Код

void __fastcall TForm1::Button1Click(TObject *Sender) {    float a = Edit1->Text.ToDouble();    Edit1->Text=Format("%.4f", ARRAYOFCONST((a)) );    if(a==0.001) Edit2->Text="Õîðîøî";     else Edit2->Text="Ìàìà";    a=a++;    Edit3->Text=AnsiString::FloatToStrF( a, ffFixed, 10, 10); }

Это сообщение отредактировал(а) Aannttoonn - 16.12.2005, 22:11

Кто Вас учил так сравнивать float? Вы можете только проверить, что два числа равны друг другу с определенной прогрешностью. Это же не целые числа
Хотя бы так, что ли

Код

if(  SameValue(a, float(0.001)  )

Это азы, которые надо знать при решении в численном виде. А так же, что если Вы ввели число 0.001, то оно в компьютере будет храниться только только, число равное ему с определенной погрешностью

ВниманиеПодправил выражение сравнения float. В Builder 6 появились специальные функции для таких целей

Но мне ведь изестно это число точно. Как мне следить за тем что комп его также точно понимает. Просто я делаю лабораторные и мне нужны только точные значения или ну с погрешностью там до 0,000000001.

Вы не доверяете компьютеру? Как то я работал со сотрудницей, которая в свои обязанности включила проверку правильности расчета на компьютере
А если Вам нужна большая точность, то Вы должны то надо тспользовать соответствующие приемы. Например вместо float, использовать double( long double) . Или даже скорее всего не long double, а BCD ( TBcd ).

Как я понял чтобы в Memo обращаться к какой-нибудь строке надо либо заранее задать кол-во строк в Memo. Либо после заполнения одной строки организовывать переход на другую - как это сделать (когда пишу ”\n” остаются какие-то чёрые полоски).

можно и так Lines->Add()

Цитата(Aannttoonn @ 12.12.2005, 21:41)

Жуткий глюк или чё. Пишу float a=0.0001; Edit1->Text=a; Выводит в Edit1: 9,99999974737875E-5 Объясните кто знает.

Используй в таких случаях double

Как в Memo удалять символы до какого-нибудь знака?