PDA

Ver la Versión Completa : Trabajo con WebBrowser

Mario94
12-03-2015, 21:39:40
Hola a todos y gracias por la ayuda de antemano.

Tengo esta idea en mente:
Necesito que al seleccionar una opcion dentro de un BDListBox , se me muestre la informacion en un webbrowser, porque lo necesito como en la wiki portable el webbrowser trabajaria como como un DBGrid.
No tengo idea de como hacerlo.
Casimiro Notevi
12-03-2015, 21:53:22
Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php), gracias por tu colaboración :)
Mario94
19-03-2015, 16:56:03
Creo que he arreglado mi problema pero de una forma muy brusca

Memo1->Lines->Clear();
Memo1->Lines->Add("<html>");
Memo1->Lines->Add("<center>");
Memo1->Lines->Add(DBEdit2->Text);
Memo1->Lines->Add("</center>");
Memo1->Lines->Add("</html>");
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
String tema = "SELECT Temas FROM Notas WHERE Temas = '"+Label1->Caption+"'" ;
ADOQuery1->SQL->Add(tema);
ADOQuery1->Open();
Memo1->Lines->Add(ADOQuery1->Fields->FieldByName("Temas")->AsString);
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
String notas = "SELECT Notas FROM Notas WHERE Temas = '"+Label1->Caption+"'" ;
ADOQuery1->SQL->Add(notas);
ADOQuery1->Open();
Memo1->Lines->Add(ADOQuery1->Fields->FieldByName("Notas")->AsString);
ADOQuery1->Close();
Memo1->Lines->SaveToFile("List.html");
String url = GetCurrentDir() +"/"+"List.html";
CppWebBrowser1->Navigate(url.c_str(),NULL,NULL,NULL,NULL);


Habra otra forma de simplificar este código.?