[Delphi] Przeszukiwanie tabeli...

0

Mam tabelę złożoną z 50 recordów i 10 kolumn, chcę żeby program przeszukiwał np. 1 i 2 kolumnę, problem w tym, że nie narzucam w programie kryteriów wyszukiwania z góry tylko są one obliczane przez program i mają stanowić kryterium wyszukiwania (nie mam wpływu na kryteria). Jak to zrobić?

:-) :-) :-)

0

Mam tabelę złożoną z 50 recordów i 10 kolumn,

var tab:array[1..50,1..10] of jakis_record;

chcę żeby program przeszukiwał np. 1 i 2 kolumnę, problem w tym, że nie narzucam w programie kryteriów wyszukiwania z góry tylko są one obliczane przez program i mają stanowić kryterium wyszukiwania (nie mam wpływu na kryteria). Jak to zrobić?

procedure wyszukajwkolumnie(var kolumna:word);
begin
for i:=1 to 50 do
if tab[i,kolumna] = 'costam' then costam;
end;

mozna powtorzyc te procedure w wielu kolumnach i zsumowac wyniki

jezeli cus zle zrozumialem prosze o wiecej danych

--
Umiem troche, ale nie wszystko :) a na koncu i tak BLUE SCREEN

0

kurcze ten post powyżej będzie wysłany za godzinę.

a tabela i tablica to nie jest to samo

0

Nie wiem czy się do końca rozumiemy (chodzi o tabelę nie tablicę), mam dwie zmienne pod którymi kryją się dane (niez nam wartości liczbowych jakie kryją się pod tymi zmiennymi bo są wyliczane w programie np. DR=?, DT=?). Ale według wartości jakie pojawią się w DR i DT mają być przeszukiwane te dwie kolumny i ma zostać znaleziony rekord który odpowiada wartościom spod DR i DT.

0

while (not table1.eof) or ((table1.FieldByName('polex').asString = DR) and (table1.FieldByName('poley').asString = DT)) do
begin
...
...
end;

0

Dzięki!!!
:-) :-) :-)

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