Динамическая строка

[Сергей089]

Скажите, пожалуйста, почему моем коде игнорируется оператор
delete [] a;?
Видимо поэтому программка не работает.
Если сделать линейную программку, то все работает и оператор delete удаляет. Может это из-за цикла?

[Сергей089]

Всем привет. Помогите удалить динамическую строку newy
Вот часть кода:

void __fastcall TForm1::CSpinEdit1Change(TObject *Sender)
{
Image1->Canvas->FillRect(Image1->Canvas->ClipRect);
if (CSpinEdit1->Value != 0) {
                             char *axiom = "X";
                             char *newf = "F";
                             char *newx = "-YF+XFX+FY-";
                             char *newy = "+XF-YFY-FX+";
                             char *newax;
                             alfa = 0;
                             teta = M_PI/2;
                             p = CSpinEdit1->Value;
                             a = (Image1->Width)/2;
                             for (int i = 1; i <= p; i++)
                                     a = a/2;
                             r = 2*a;
                             b = (Image1->Width)-a;
                             /*for (int i = strlen(newax)-1; i >= 0; i--)
                                     newax[i] = '\0';*/
                             while (p > 0)
                                {
                                 newax = "";
                                 for (int i = 0; i < strlen(axiom); i++)
                                        switch (axiom[i]) {
                                                           case 'F': strcat(newax,newf); break;
                                                           case 'X': strcat(newax,newx); break;
                                                           case 'Y': strcat(newax,newy); break;
                                                           case '+': strcat(newax,"+"); break;
                                                           case '-': strcat(newax,"-"); break;
                                                          }
                                 p -= 1;
                                 strcpy(axiom,newax);
                                 /*for (int i = strlen(newax)-1; i >= 0; i--)
                                        newax[i] = '\0';*/
                                        delete [] newax;
                                        newax = NULL;
                                }
                             delete [] newf;
                             newf = NULL;
                             delete [] newx;
                             newx = NULL;
                             delete [] newy;
                             newy = NULL;
                             x = floor(a);
                             y = floor(b);
                             Image1->Canvas->MoveTo(x,y);
                             for (int i = 0; i < strlen(axiom); i++)
                                     switch (axiom[i]) {
                                                        case 'F': {
                                                                   a = r*cos(alfa)+a;
                                                                   b = r*sin(alfa)+b;
                                                                   x = floor(a);
                                                                   y = floor(b);
                                                                   Image1->Canvas->LineTo(x,y);
                                                                  } break;
                                                        case '+': alfa += teta; break;
                                                        case '-': alfa -= teta; break;
                                                       }
                             delete [] axiom;
                             axiom = NULL;
                            }
}

На операторе

delete [] newy;

вылетает ошибка:

Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 011943BB in module 'BORLNDMM.DLL'. Read of address 006DAAE0'. Process stopped. Use Step or Run to continue.

И еще после оператора:

strcpy(axiom,newax);

в newf вместо "F" откуда-то появляется "F+XFX+FY-", а в newx вместо "-YF+XFX+FY-" - "XFX+FY-". Почему так?

[nazavrik]

char *newy = "+XF-YFY-FX+";

Это что?! Чтобы удалить(освободить) память её нужно сначала выделить. Замени строку так:

char *newy = new char[size];
strcpy(newy, "+XF-YFY-FX+");

[Сергей089]

Максимально длина 256? Просто на каждой итерации в axiom вместо 'X' и 'Y' вставляются "-YF+XFX+FY-" и "+XF-YFY-FX+" соответственно. Сейчас попробую, но, кажется, не хватит 256.

[Сергей089]

Работает. А что тогда я здесь сделал?

char *newy = "+XF-YFY-FX+";

Если посмотреть Watch List, то строка "+XF-YFY-FX+" вроде бы записывалась в newy.
256 мало. Дошел только до 3 итерации, хотя на Delphi до 8. Есть ли в Builder аналог типа string из Delphi? Я вроде бы нашел такой же тип String, но не знаю функций для него. Как для такой строки длину определить и какую-нибудь i-ую букву?

[nazavrik]

Сообщение от Сергей089

Работает. А что тогда я здесь сделал?

char *newy = "+XF-YFY-FX+";

Вы здесь определили указатель на статическую строку-константу. В то время как new и delete соответственно выделяет и освобождает память динамически.