Cita:
Empezado por DrakStorm
[delphi]
// Cuando marco los puntos al hacerles click muestro en unos edit la informacion guardada en la DB referente al punto seleccionado
procedure TFMapa.GMMark2Click(Sender: TObject; LatLng: TLatLng; Index: Integer;
LinkedComponent: TLinkedComponent);
begin
if GMMark2.Count > 0 then begin
// ACA SE GENERA EL ERROR
AQmap.Active := false;
// LA PRIMERA VEZ QUE MUESTRO LOS PUNTOS FUNCIONA PERFECTO, CUANDO HAGO EL CLEAR Y VUELVO A CARGAR LOS PUNTOS ME PASA LO SIGUIENTE
// CUANDO HAGO CLICK EN EL MARCADOR EL linkedcomponent.id ME DA EL VALOR CORRECTO PERO GMMark2.items[linkedcomponent.id].title QUEDA VACIO COMO SI EL MARCADOR NO TUVIERA UN TITLE
AQmap.SQL.Text := 'select id, tipodelito, otros from oficios WHERE id="'+GMMark2.items[linkedcomponent.id].title+'"';
AQmap.Active := true;
Edit1.Text := AQmap.FieldByName('id').AsString;
Edit2.Text := AQmap.FieldByName('tipodelito').AsString;
Edit3.Text := AQmap.FieldByName('otros').AsString;
end;
end;
|
Disculpas por pegar de nuevo pero no podía editar el mensaje.