Pascal --> Delphi : recordy

0

Mam plik danych stworzony w Pascalu
Rekord wygląda następująco

Type=Record
pole1 : Array[1..3] Of Word;
pole2 : Array[0..20] Of Byte;
pole3 : Array[1..2,1..10] Of Longint;
End;

W Delphi napisałem identyczną strukturę rekordu, ale program błędnie mi czyta wyniki. Może ktoś wie dlaczego?
Pozdrawiam {hello}

0

w delphi bedzie chyba tak:

type
TPola = Record
pole1 : Array[1..3] Of Word;
pole2 : Array[0..20] Of Byte;
pole3 : Array[1..2,1..10] Of Longint;
end;---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

Sorrki,

Record wygląda tak

Type
wyniki=Record
pole1 : Array[1..3] Of Word;
pole2 : Array[0..20] Of Byte;
pole3 : Array[1..2,1..10] Of Longint;
End;

0

sprobuj to:

type
TWyniki = record
pole1 : Array[1..3] of Word;
pole2 : Array[0..20] of Byte;
pole3 : Array[1..2,1..10] of Longint;
end;

i pozniej gdzies w programie

var
Wyniki : TWyniki;
begin
Wyniki.Pole1[1] := 1;
//itd.
end;

--
-=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

Czym LKS rozni sie twoja definicja od definicji poprzednika ?

0

tym ze u mnie jest TWyniki a nie Wyniki :-)
ale to i tak nie ma roznicy i powinno chodzic i tak i tak :-)---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

a chodzilo mi konkretnie o to ze moze pan Pawlik67 nie zadeklarowal zmiennej wskazujacej na jego record :-)---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

Jak dalej zle chodzi odczyt z pliku, sprobuj
&gt
&gttype
&gtTWyniki = packed record
&gt
itd.

zeby wylaczyc wyrownywanie pol.

Rob tak zawsze kiedy tworzysz lub czytasz pliki, a nie bedziesz mial problemow z kompatybilnoscia.
--Pawel

Delphi6

0

Przepraszam, że długo nie odpisywałem.
Wreszcie jednak udało mi się sprawdzić Wasze propozycje.
Duże piwo dla pg i LKS.
{browar} {browar}
Niezależnie czy zdeklaruję
TWyniki , czy Wyniki...
...ale musi być
Type
Wyniki=packed record
...
...
End;
... i działa.
Dzięki bardzo za podpowiedź {hello}

0

&gtDuże piwo dla pg

pq (PQ), jesli mozna prosic... :-) --Pawel

Delphi6

0

pq napisał:

&gt&gtDuże piwo dla pg
&gtpq (PQ), jesli mozna prosic... :-)

Do pg i LKS...
Miło mi będzie jeśli do tego piweczka dodamy spotkanie.
Puby w W-wie czekają na nas {hello}
Czekam na propozycję {browar} --Pawlik67
Zapraszam :-)
www.vebso.pl
UŻYTKOWNIK 9969489

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