DBgrid1 - porównywanie...

0

cześć, w polu DBGrid1 mam w jednej kolumnie(x) podane jakieś wartości real, w polu : edit1 podaje jakąs wartosć real. Program ma wybrać z kolumny najbliższą wartość do wartości podanej w polu edit1. ????????

0

Nie mam za bardzo czasu aby Ci przeslac gotowy kod, ale jesli robisz to na np. na TQuery to ja zorbilbym to na zasadzie przelecenia wszystkich recordow i porownywania (roznica) z zapamietaniem najbardziej zblizonej

var zblizona:real;
i:integer;

zblizona :=0;
for i:=0 to Query1.RecordCount-1 do
begin
if abs(Query1.FieldByname('etykieta pola z wartoscia') - wartosc z Edit1) < zbliozna then zblizona = (Query1.FieldByname('etykieta pola z wartoscia')
end

i to tyle
petal zapamieta najbardziej zblizona ale nie powie Ci z ktorego to bylo miejsca, jakby bylo to potrzeben to musialbyc jeszcze zapamietac Query.recNo

1 użytkowników online, w tym zalogowanych: 0, gości: 1