как решить данную задачу не через StringGrid а через файл в котором и будут храниться данные

[unbanned]

// Create a new text file and write some text into it 

procedure NewTxt;
 var
   f: Textfile;
 begin
   AssignFile(f, 'c:\ek.txt'); {Assigns the Filename}
   ReWrite(f); {Create a new file named ek.txt}
   Writeln(f, 'You have written text into a .txt file');
   Closefile(f); {Closes file F}
 end;

 // Open existing text file and append some text 
procedure OpenTxt;
 var
   F: Textfile;
 begin
   AssignFile(f, 'c:\ek.txt'); {Assigns the Filename}
   Append(f); {Opens the file for editing}
   Writeln(f, 'You have written text into a .txt file');
   Closefile(f); {Closes file F}
 end;

   // Open existing text file and show first line 
procedure ReadTxt;
 var
   F: Textfile;
   str: string;
 begin
     AssignFile(f, 'c:\ek.txt'); {Assigns the Filename}
   Reset(f); {Opens the file for reading}
   Readln(f, str);
   ShowMessage('1. line of textfile:' + str);
   Closefile(f); {Closes file F}
 end;

http://www.delphisources.ru/pages/fa...iles_work.html

[ALEXandr20333]

этто на делфи

[Vanta11a]

Угу. Осталось включить мозг и добавить GUI.

Ну а если мозг приспособлен только к выпрашиванию решения - выпрашивать его не на халяву, а с оплатой.