//Глобальные переменные
int size =  25 ;
int width =  5 ;
double* dest =  0 ; // динамический массив

void __fastcall TMainForm::Open1Click(TObject *Sender)
{
FILE* in;
int jj =  0 , ii =  0 ;
in = fopen("a.txt", "r"); //файл состоит из 0 и 1 
for (int i= 0 ; i<size && !feof(in); ++i)  
{                                            
                fscanf (in,"%lf",&dest+i); //И ВОТ ТУТ МОЖНО ТАК ЗАНОСИТЬ ДАННЫЕ В ДИНАМИЧЕСКИЙ МАССИВ??? просто где то увидел такую запись                
                if (dest[i] >  0 ) // [color=red]ВОТ ТУТ РУГАЕТСЯ[/color]
                                Learned->Cells[ii][jj]="*"; //заношу в StringGrid размера 5*5
                else
                                Learned->Cells[ii][jj]=".";        
                ii++;
                if ( (i+ 1 )%width== 0  )                   
                                {jj++;ii =  0 ;}
}
fclose (in); 
}   

dest = (double*)malloc(sizeof(double));
fscanf (in,"%lf",&dest);                  
if (dest[i] >  0 )