Прочитать в скрипте данные из выбранной строки Grid

Добавил для этого свойство SelectedRow
Скачайте 1.41 версию
https://www.dropbox.com/s/fr76z69sc69l1 … 201.41.zip

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
    
   ShowMessage(Form1.GridSearch.Cells[1,Form1.GridSearch.SelectedRow]);

end;

здесь показывается сообщение с текстом ячейки в 1 колонке выбранной строки грида.

Привести текст к числовому виду можно так: StrToInt(текст)

в случае с компонентом Label:  StrToInt(Form1.Label1.Caption)
для грида тоже самое, текст ячейки нужно привести к числу, если необходимо сранивать сравнивать числа.

а чтобы сравнить, в целом условие будет такое

if StrToInt(Form1.GridSearch.Cells[1,Form1.GridSearch.SelectedRow]) = StrToInt(Form1.Label1.Caption) then ShowMessage('равно');

при использовании функции StrToInt может возникнуть ошибка, если попытаться привести текст к числовому типу, для этого можно отловить эту ошибку и обработать, например так:

try
  if StrToInt(Form1.GridSearch.Cells[1,Form1.GridSearch.SelectedRow]) = StrToInt(Form1.Label1.Caption) then ShowMessage('равно');
except
  ShowMessage('Возникла ошибка преобразования к числовому типу');
end;

Воспользуйтесь событием кнопки OnClick

Срабатывает при нажатии кнопки
Данное событие имеет переменную Cancel, которая позволяет предотвратить выполнение действия, которое было назначено для кнопки, например если кнопка имеет действие Сохранить запись, вы можете выполнить проверку, все ли необходимые поля на форме заполнены, и если это не так, присвоить переменной Cancel значение True, что в свою очередь предотвратит выполнение действия Сохранить запись.

пример:

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
   if Form1.Edit1.Text='' then
   begin
      ShowMessage('Незаполнено обязательное поле.');
      Cancel := True;
   end;
end;

Сделал так:
if MessageDlg('На складе отсутствует такое количество! Будет добавлено ' + atStoreNumStr + unitStr, mtConfirmation, mbYes+mbNo, 0) = mrNo then
Работает, только на кнопках написано Yes и No. Это как-то решается?

Теперь написано OK и Cancel. Я имел ввиду можно сделать чтобы по русски было написано?