jun 212012
Buenas,
Hoy os traigo una nueva versión de los componentes GMLib, la versión 0.1.3 Pre-Alpha, con bastantes cambios internos y novedades:
- Nuevo componente, el TRectangle que, como su nombre indica, no es más que un rectángulo.
- Cambio: se ha cambiado la carpeta destino de los DCU. Ahora, cada versión de Delphi tiene la suya.
- Nuevo: se ha añadido el evento OnChange en la clase TLatLng.
- Nuevo: se ha añadido el método público StringToReal en la clase TLatLng. Este método tiene en cuenta la configuración regional en el momento de hacer el cambio. Con esta función se intenta corregir los problemas que había entre los países con diferente configuración regional.
- Nuevo: se ha añadido el método GetCenter en la clase TLatLngBounds.
- Cambio: se han publicado las propiedades NE y SW de la clase TLatLngBounds.
- Nuevo: se ha añadido la propiedad Tag (entero) a la clase TLinkedComponent (por lo que afecta a todos los CollectionItems heredados de la misma como TMarker, TPolygon,….).
- Nuevo: se ha añadido la propiedad FObject (TObject) a la clase TLinkedComponent.
- Nuevo: se han añadido métodos protegidos (SetProperty) en la clase TLinkedComponent para generalizar el cambio de las propiedades y evitar la duplicidad de código.
- Nuevo: se ha añadido la propiedad Icon al TMarker para poder especificar un icono a mostrar (en lugar del estándar). Éste puede ser un archivo en el PC o una imagen en la web. El componente lo que hace es comprobar si existe el dato especificado como archivo y, en caso de no existir, asume que es una URL (no me he complicado mucho la vida en hacer muchas comprobaciones). En blanco para la imagen por defecto.
- Nuevo: se ha añadido el evento OnIconChange a la clase TGMMarker.
- Cambio: se han cambiado todos los métodos Set de las clases descendientes de TLinkedComponent para evitar la duplicidad de código y hacer las llamadas a los nuevos métodos de TLinkedComponent (SetProperty).
Como siempre, más información en la página de los componentes.
Que los disfrutéis
Nos leemos
Hi
i am getting a script error when i call domap
Line 1 char 7
message is syntax error
when i break it goes to Win2.execScript(NameFunct + ‘(‘ + Params + ‘)’, ‘JavaScript’);
exception reads
First chance exception at $75F1B9BC. Exception class EOleException with message ‘Could not complete the operation due to error 80020101’. Process Project2.exe (8544)
and breaks to here
function TGMMap.ExecuteScript(NameFunct, Params: string): Boolean;
var
Doc2: IHTMLDocument2;
Win2: IHTMLWindow2;
begin
Result := Check;
if not Result then Exit;
Doc2 := FWebBrowser.Document as IHTMLDocument2;
Win2 := Doc2.parentWindow;
Win2.execScript(NameFunct + ‘(‘ + Params + ‘)’, ‘JavaScript’);
if MapIsNull then
raise Exception.Create(GetTranslateText(‘El mapa todavía no ha sido creado’, Language));
end;
Hope this helps
Hi Shaun
Can you give me more information? I have test it and work ok for me. Is it possible that you have an old bpl or something like this?
Yes i checked that no old files were laying around and didn’t find any.
i deleted all the source files as well making sure i had uninstalled them from the IDE and downloaded fresh to make sure i did have the latest
please let me know what extra information i can give you.
If it is possible, I need the value params of Win2.execScript function, ie, NameFunct and Params and the component that send error (GMMap, GMMarker,….)
Thanks
The params are{ L»,,’ROADMAP’,8,false,true,true,false,true,0,0,’#EFF0EE’,true,’HYBRID;ROADMAP;SATELLI
TE;TERRAIN’,’TOP_RIGHT’,’DEFAUL» }
The NamFunct is DoMap
i created a new application with just a gmmap and a webbrowser component on it
in onformcreate i do GMMap1->Active = true;
and then i do the following once the page has loaded
void __fastcall TForm3::GMMap1AfterPageLoaded(TObject *Sender, bool First)
{
if( First )
{
GMMap1->DoMap();
}
}
if you would like direct access to my computer i am happy to allow you to connect using teamviewer if that will help, that way you can debug first hand you code. if you would like to try that please email me and i can give you the details
Just to confirm i am using C++ Builder XE2 update 4.
I also get an issue with one of the generated hpp files this line in GMBase.hpp
__property Uaboutfrm::TAboutFrm* AboutGMLib = {read=FAboutGMLib, stored=false};
Causes the following issue
[BCC32 Error] GMBase.hpp(48): E2040 Declaration terminated incorrectly
i simply comment this line out and the error goes away
I have send you an email 😉
Before, thanks for great lib,
I have the same problem,
I just download your libs today and install into Delphi 7 Ent.
But when i recompile GMMarker_Demo, i have the issue problem
«Exception class EOleException with message ‘Could not complete the operation due to error 80020101′»
Is there any solution.
Thanks So much for your help
Hi Irfan
Thanks for test this lib 🙂
Can you debug the program (and components) and can you say me where exactly (line of code) is fired this exception? I need too values of params if this is a function.
Can you try to change the decimal separator to ‘,’ in your regional configuration to try if this is the problem?
Thanks
PS: I have test it in D2010 and work fine
Dear cadetill
My Error is javascript error which is : ERROR: Expected ‘)’
On GMMarker_Demo compile on Delphi 7,
GMMarker1.VisualObjects[0].InfoWindow.HTMLContetnt = «Camp Nou
El Camp Nou (nombre que en catalán significa «Campo Nuevo», pronunciado [kam ‘n?w]), a menudo………..»
Referring to this
http://waxtadpole.wordpress.com/2010/04/14/javascript-error-expected-code-0-line-xxx-character-xxx-ie-only/
[kam ‘n?w]) which is contain a » ‘ » or apostophe (single-quote) in Javascript
so i remove the ‘ (aposthope) …..
Regards
Irfan Rosjidi
Thanks Irfan, I will try to fix this bug 🙂
Regards
cadetill
dear cadetill
I have found small thing that causing the error…
Thank You for your great libs…