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

Diskuze čtenářů k článku

cicvarek  |  10. 03. 2003 22:07  | 

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.

Souhlasím  |  Nesouhlasím  |  Odpovědět
Luděk Čermák  |  11. 03. 2003 07:36  | 

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 .

Souhlasím  |  Nesouhlasím  |  Odpovědět
Petr  |  11. 03. 2003 13:27  | 

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.

Souhlasím  |  Nesouhlasím  |  Odpovědět
Vaclav Kadlec  |  13. 03. 2003 22:24  | 

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.

Souhlasím  |  Nesouhlasím  |  Odpovědět
Kaeru  |  26. 08. 2007 22:36  | 

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:='';

Souhlasím  |  Nesouhlasím  |  Odpovědět
Zasílat názory e-mailem: Zasílat názory Můj názor

Aktuální číslo časopisu Computer

Velký test Wi-Fi mesh

Nejlepší hodinky pro všechny aktivity

Důležité aplikace na cesty

Jak streamovat video na Twitch