Solved

Delphi  with VRML

Posted on 2013-01-18
11
526 Views
Last Modified: 2013-09-11
Hi

  I need to view a VRML file inside my delphi application with ability to rotate using the code


Any Idea ??
0
Comment
Question by:omarmsf
  • 3
  • 3
  • 2
  • +2
11 Comments
 
LVL 8

Expert Comment

by:H
ID: 38795151
I would convert to a more usable format on the fly

http://www.ogre3d.org/tikiwiki/tiki-index.php?page=VRML%20Converter
0
 

Author Comment

by:omarmsf
ID: 38795901
Ok, then ??
0
 
LVL 8

Expert Comment

by:H
ID: 38797035
Okay well lets start with an image format that you are familiar with and that is very easy to manipulate within Delphi.For example convert it to a simple bitmap image and here is a nice article and code examples on rotating a bmp file.

http://stackoverflow.com/questions/848025/rotating-bitmaps-in-code

So you could use one of the open source vrml coverters to dynamically convert to a bitmap then you could easily write code to rotate the image.
0
 

Author Comment

by:omarmsf
ID: 38797147
Put I need to rotate a 3D object. witch is exported from 3D studio or solid works, simply i need to create a viwer using dephi
0
 
LVL 8

Expert Comment

by:H
ID: 38797207
Okay well I would start with this awesome Delphi programming resources

http://www.freebyte.com/programming/delphi/

Ive seen image viewer code on this site written in delphi
0
How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

 
LVL 19

Assisted Solution

by:Thommy
Thommy earned 166 total points
ID: 38797258
0
 

Author Comment

by:omarmsf
ID: 38815623
I cant this lib (AiS VRML Library ) the link is restrickted in UAE, can you please send it
0
 
LVL 1

Accepted Solution

by:
ipaliokas earned 334 total points
ID: 39299676
1) Download and install Cortona3D viewer for free (http://www.cortona3d.com/downloads)

2) Import a TWebBrowser component in your Delphi form

3) Navigate TWebBrowser to VRML (*.wrl) file

4) Use internal Cortona3D navigation controls to rotate, move, pan, zoom, etc.

I made a simple demo (pls download and see the attachment)

Hava a nice time.
0
 
LVL 1

Assisted Solution

by:ipaliokas
ipaliokas earned 334 total points
ID: 39299710
...and here is the demo program.
DelphiVRMLViewer.zip
0
 
LVL 36

Expert Comment

by:Geert Gruwez
ID: 39482535
This question has been classified as abandoned and is closed as part of the Cleanup Program. See the recommendation for more details.
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Illustrator's Shape Builder tool will let you combine shapes visually and interactively. This video shows the Mac version, but the tool works the same way in Windows. To follow along with this video, you can draw your own shapes or download the file…
This video shows how to remove a single email address from the Outlook 2010 Auto Suggestion memory. NOTE: For Outlook 2016 and 2013 perform the exact same steps. Open a new email: Click the New email button in Outlook. Start typing the address: …

760 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now