И ещё вопросик как обойти вопрос брэндмауэра типо блокировать или нет приложение, хотя прикол нажал блокировать и все равно соединение установилось и лог ушел)
Возник еще один вопросец...
Нужно рассчитать кол-во товара значит, и чтоб результат расчета появлялся в
Form1.StringGrid1.Cells[2,1]..т.е. вводим в Edit1 сумму, ждем "Рассчитать" и в ячейке появляется результат..
Вот скрин для наглядности:
procedure расчитатьbtn.click (sender:Tobject)
x,y:integer;
begin
x:=strtoint(edit1.text);
y:=формула которая чтото делает с Х;
stringgrid1.cells[2,1]:=inttostr(y);
end;
0ldbi4, Выруби брэндмауэр и он не будет тебе вопросы задавать....SHAXID, ты что то с переменными напутал, посмотри повнимательней, у тебя x и y разных типов и поэтому ты неможешь ничего сделать. Incompatible types=несовместимые типы.
Последний раз редактировалось DiHWO; 21.11.2009 в 11:10..