Avatar billede moejensen Nybegynder
16. juli 2003 - 14:18 Der er 9 kommentarer og
1 løsning

plotte punkter ind på et kort udfra længdegrader og breddegrader

Jeg søger noget sourcekode der læser længdegrader og breddegrader for en række punkter i en database eller en txt fil, og plotter dem ind på et kort.

Er der nogen der kan hjælpe med det?
Avatar billede martin_moth Mester
16. juli 2003 - 16:31 #1
Det er jo nemt nok at læse fra en database eller en textfil - men hvad mener du med at det skal plottes på et kort?

Hvilket kort? Vektor-grafik eller bitmap? Skal det plottes direkte fra VB eller via et program, der kan håndtere kort-formatet?

Jeg har lavet et VB-program der kan tegne i MicroStation (.dgn-filer) - er det sådan noet du ønsker?
Avatar billede moejensen Nybegynder
16. juli 2003 - 17:17 #2
Programmet skal bare læse længdegrader og breddegrader fra en database, og så efterfølgende sætte et mærke med et navn (som også hentes i databasen) på et verdenskort. det er lige meget om det er et bitmapkort eller vektor.
Avatar billede martin_moth Mester
16. juli 2003 - 17:23 #3
"så efterfølgende sætte et mærke med et navn ... på et verdenskort"

Hvordan?
Avatar billede moejensen Nybegynder
16. juli 2003 - 18:26 #4
Hvordan det gøres, det er det jeg ikke ved, som jeg gerne vil have noget hjælp til.

I databasen findes ex en record der hedder længdegrad 10E breddegrad 50N navn test

der skal nu sættes et mærke på et verdenskort på 10E,50N. ovenfor prikken sættes nacnet test.
Avatar billede mikker Nybegynder
16. juli 2003 - 21:04 #5
pset(10,50) ??

- Mikker
Avatar billede martin_moth Mester
16. juli 2003 - 21:14 #6
Prøv at start med at finde ud af hvad du vil - skal verdenskortet gemmes med prikkerne på som en bitmap - eller vil du arbejde med vektorgafik.
Skal det være den helt simple løsning, nemlig at læse en bitmap ind, lave en lille omregningstabel fra VB-koordinater til breddegrad/længdegradskoordinater, og så vise nogle punkter på denne som mikker viser..?
Avatar billede mikker Nybegynder
16. juli 2003 - 21:25 #7
Jeg fandt lige ud af, at jeg faktisk ikke aner en kæft om laengde og bredde :o)

Private Sub Command1_Click()
Dim antlaengde, antbredde, strlaengde, strbredde
Dim tposx, tposy

antlaengde = 100 ' antallet af laengdegrader
antbredde = 100 ' antallet af breddegrader
With Me
strlaengde = .ScaleWidth / antlaengde
strbredde = .ScaleHeight / antbredde
PSet ((strlaengde * 10), (strbredde * 15)), vbBlack
.CurrentX = .CurrentX + 10
.CurrentY = .CurrentY + 10
Print "STED1"
End With
End Sub

Private Sub Form_Load()
With Me
.ScaleMode = 1 ' twip
.AutoRedraw = True
End With

End Sub

- Mikker
Avatar billede mikker Nybegynder
16. juli 2003 - 21:34 #8
Gad vide hvorfor jeg ikke kan få min With... End With til at virke ordentligt?

Anyway her er en version der plotter direkte på en picturebox, så er det bare at lægge billedet ind, tilslutte databasen og så selvfølgelig lige rette antallet af laengde og breddegrader :o)

Sov godt.

- Mikker
Avatar billede moejensen Nybegynder
16. juli 2003 - 23:11 #9
det ser jo ganske godt ud, men hvordan ved jeg så om prikken kommer til at passe med kortet. Hvis jeg indtaster koordinaterne for NY, er jeg så sikker på at prikken vil være ved NY?
Avatar billede mikker Nybegynder
17. juli 2003 - 18:45 #10
Det skulle jeg da mene :o)

Hvis du har et billede der er 1000x1000 twips, vil punktet 500,500 altid være det samme sted... Med mindre du er ude på at lave en globus der drejer, så står jeg af :o)

Jeg må have været træt igår, mit sidste løsningsforslag er ikke kommet med !?

- Mikker
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Seneste spørgsmål Seneste aktivitet
I dag 10:21 Ny printer, men hvilken Af mort1 i Printere
I går 19:41 USB på Linux Af Uvanga i Linux
12/0818:26 Hvilken type mus Af mort1 i PC
11/0813:21 ms Forms Af leahcim i Andet software
10/0821:30 Blokeret på Snapchat? Af LineP i Chat & Messaging