Umíme to s Delphi: 78. díl – databázová aplikace v BDE

Mám problém. Jak uložit text z komponenty Memo do databáze za běhu programu pomocí SQL příkazu INSERT? Pokud ukládám text z Editu, tak žádný problé, pokud z Mema, tak to vyhlásí incopatible Types - String a TString... Prosím pomozte, tady je kód:

//Příprava proměnných

nazev:=Edit1.Text;

popis:=Memo1.Text;

lokace:=Edit2.Text;

hraci:=Edit3.Text;

//zápis do databáze

Query1.SQL.Clear;

Form1.Caption:='Hry';

Query1.SQL.Text:='INSERT INTO Hry values("'+nazev+'","'+Memo1.Lines+'","'+lokace+'","'+hraci+'")';

Query1.ExecSQL;

ShowMessage('Přidáno');

Edit1.Text:='';

je to skvele ze ucite lidi delphi, je to dost problem se to ucit sam. Makam na diplomce a uz mesic mne trapi problem s desetinnou carkou. Us instalacich windowsu se pouziva desetinna carka, v CZ instalacich desetinna tecka, existuje funkce, ktera toto hlida?? Jak to naprogramovat?? Napada mne reseni, ale chtel bych vedet, jestli to resi nejaka funkce, nebo si to musim naprogramovat sam. Diky za odpoved.

Dobry den, reseni Vaseho problemu je jednoduche. V Delphi existuje globalni promena DecimalSeparator, ktera se iniciuje dle "Mistniho nastaveni" systemu. Clanek je sice tak trochu "OUT OF DATE", ale snad se to spravi v dalsich pokracovanich .

Clanek je pekny. Ale je treba si uvedomit, ze BDE je uz mrtva technologie kterou nebude Borland dale vyvijet ani podporovat. Takze stavet na tom dnes aplikaci je nesmysl. Pro male lokalni databaze je tu MyBase, neboli TClientDataSet + XML.

To rozhodne, ale porad si myslim, ze nektere veci na tom jsou pomerne hezky videt; snazim se prinutit i uplne zacatecniky, aby pochopili db architekturu v Delphi a na to je myslim BDE vzhledem ke sve relativni nazornosti vhodne. Ale jak jsem slibil v clanku, postupne se budeme v serialu zabyvat i dalsimi db platformami a komponentami: ADO, Interbase, dbExpress, apod.