Помогите со stringgrid ом

← →
vnutr © (2011-01-07 20:12) [0]

_кол-1___|___кол-2___|
____1,1___|____2,1_____|
____1,2___|____2,2_____|
____1,3___|____2,3_____|

if (1,2>1,1)and(1,2<2,1) then showmessage("dfgdegf");
if (1,3>1,2)and(1,3<2,2) then showmessage("dfgdegf");

и т.д.

ПОМОГИТЕ ПОЖАЛУЙСТА!!! Как это осуществить?
Я пишу:
procedure TForm1.Button1Click(Sender: TObject);
var
BeginDate, EndDate: Tdatetime;
r: integer;

begin
for r:= 1 to StringGrid1.RowCount do
begin
if (stringgrid1.Cells[0, r]<>"")or(stringgrid1.Cells[1, r]<>"") then
begin
BeginDate:= StrToDate(Stringgrid1.Cells[0, r]);
EndDate:= StrToDate(Stringgrid1.Cells[1, r]);

if (StrToDate(StringGrid1.Cells[0,r+1])>BeginDate)and(StrToDate(StringGrid1.Cells[0,r+1])<EndDate) then
showmessage(StringGrid1.Cells[0,r+1] + " входит в период " + " от "+ DateToStr(BeginDate) + " по " + DateToStr(EndDate));

end;
end;
end;
Всё вроде бы работает, но в конце концов выдаёт ошибку.
ПОМОГИТЕЕЕЕ

← →
vnutr © (2011-01-07 20:15) [1]

Вот ошибка - Project raised exeption class EConvertError with message """" is not a valid date. Process stopped. Use Step or Run to continue

← →
Сергей М. © (2011-01-07 20:15) [2]

> в конце концов выдаёт ошибку.

"конец концов" - это RowCount-1, а не RowCount

← →
vnutr © (2011-01-07 20:20) [3]

Это не помогает. Я уже пробовал(( Пробовал отлавливать конец списка:
if r < StringGrid1.RowCount- 1 then
begin
if (StrToDate(StringGrid1.Cells[0,r+1])>BeginDate)and(StrToDate(StringGrid1.Cells[0,r+1])<EndDate) then
showmessage(StringGrid1.Cells[0,r+1] + " входит в период " + " от "+ DateToStr(BeginDate) + " по " + DateToStr(EndDate));
end
else
ShowMessage("Конец списка");
Все равно безнадежно. Что я не так делаю? Помогите пожалуйста

← →
Сергей М. © (2011-01-07 20:42) [4]

> Это не помогает

Это другие грабли. Но не менее больно лупцующие по лбу не читающего справку.
А первые грабли - в DecimalSeparator

← →
vnutr © (2011-01-07 20:44) [5]

???
А можете разъеснить

← →
Сергей М. © (2011-01-07 20:48) [6]

> разъеснить

Ну а что тут не есно ?
При конвертации строкового представления числа с п/з в ссамо число с п/з используется именно тот символ-разделитель целой и дробной частей. который на момент конвертации фигурирует в глоб.переменной DecimalSeparator.

← →
vnutr © (2011-01-07 20:51) [7]

И как мне быть с моей проблемой? Что посоветуете?

← →
Советую (2011-01-07 20:54) [8]

Удалено модератором

← →
vnutr © (2011-01-07 20:59) [9]

Удалено модератором

← →
Сергей М. © (2011-01-07 20:59) [10]

Удалено модератором

← →
Сергей М. © (2011-01-07 21:02) [11]

Удалено модератором

← →
vnutr © (2011-01-07 21:04) [12]

Удалено модератором

← →
12 © (2011-01-07 21:07) [13]

Удалено модератором

← →
Христосов И.Я. (2011-01-07 21:11) [17]

Удалено модератором

Помогите со stringgrid ом Найти похожие ветки