Вернуть программу к начальному состоянию

[Raina97]

Здравствуйте.При нажатии на кнопку у меня заполняется стрингГрид из едитов,и идет соответственное добавление ячеек.
Это одноразовый процесс,т.к.потом все данные начинают сбиваться.Как вернуть программу к ее изначальному состоянию?Т.е.как только я ее запустила и еще не нажала на кнопку,что то вроде "Сброс"

[Аватар]

По простому - убить форму и по-новой создать её. По сложному - откатится назад путем очистки полей стрингрида и удаления динамически созданных компонент

[Stilet]

Ну а что мешает оформить Array of array of string и наполнить его исходными строками, чтоб уже из него наполнять Грид когда это нужно?

[Raina97]

Сообщение от Аватар

По простому - убить форму и по-новой создать её. По сложному - откатится назад путем очистки полей стрингрида и удаления динамически созданных компонент

А можете написать как?Я просто только только начинаю разбираться

[FaTaL]

Сообщение от Аватар

По простому - убить форму и по-новой создать её.

А если форма главная, то такое не получится. Или я не прав?

[Аватар]

Не получится

[Raina97]

Сообщение от FaTaL

А если форма главная, то такое не получится. Или я не прав?

Форма главная

[Stilet]

А можете написать как?

Сначала ты. Покажи код наполнения грида.

[zvygin1964]

Очищаю таблицу так:

procedure TForm1.ClearTable;
var local_variable:Integer;  //    локальная переменная
begin
  with StringGrid1 do
  for local_variable:=0 to ColCount-1 do
    Cols[local_variable].Clear;
end;