advertentie

Dit forum is niet langer actief. Voor vragen kun je voortaan terecht in de Vraag & Antwoord-rubriek van PCMweb.nl

 
Oud 2 September 2010, 16:40   #1
l_v
Just Joined!
 
Geregistreerd: 2 September 2010
Berichten: 2
Standaard Locate

Sorry, het vorige bericht was ook van mij, had hetzelfde bericht ook op een engels forum gepost, vandaar de fout.
Wat ik graag wil weten is het volgende. Ik ben van BDE naar ADO geswitched. In BDE had ik de volgende code:

with PC5Table do
begin
SetKey;
FieldByName('PC5').AsString := copy(FromPC,1,5);
GotoNearest;
FromX5 := PC5Table.FieldByName('XCOORD').AsInteger;
FromY5 := PC5Table.FieldByName('YCOORD').AsInteger;
end;


if PC5Table.FindKey([copy(FromPC,1,5)]) then begin
FromX5 := PC5Table.FieldByName('XCOORD').AsInteger;
FromY5 := PC5Table.FieldByName('YCOORD').AsInteger;
end;



Dit heb ik veranderd in:


if PC5Table.Locate('PC5',copy(FromPC,1,5), [])
then
begin
FromX5 := PC5Table.FieldByName('XCOORD').AsInteger;
FromY5 := PC5Table.FieldByName('YCOORD').AsInteger;
end;

Helaas geeft dit echter niet dezelfde uitkomsten. Iemand enig idee hoe dit komt?
l_v is offline   Met citaat antwoorden
Antwoord


Discussietools
Weergave

Regels voor berichten
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Aan
Smileys zijn Aan
[IMG]-code is Aan
HTML-code is Uit

Forumnavigatie


Alle tijden zijn GMT +1. Het is nu 14:47.



Powered by vBulletin Version 3.8.6
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
Nederlandse vBulletin-vertaling door Alacer beschikbaar gesteld door Applinet.