Új hozzászólás Aktív témák

• #992 Tele von Zsinór őstag Notes #989

  Új Válasz 2005-10-27 21:15:49 #992

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Tele von Zsinór

  őstag

  válasz Notes #989 üzenetére

  Igaza van az előttem szólónak. Egy ojjektum szülőjét létrehozáskor állítja be a delphi, ha utólag húznád rá akkor az nem fog menni. Esetleg az object treeview-ben is át lehet húzni, na meg a form forrását kézzel szerkeszteni

• #990 BlackWoOd aktív tag Notes #989

  Új Válasz 2005-10-27 19:46:51 #990

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  BlackWoOd

  aktív tag

  válasz Notes #989 üzenetére

  Semmit nem csinálsz rosszul.
  
  Esetleg csináld úgy, hogy kijelölöd a komponenseket, amiket a groupboxba akarsz pakolni, majd ''Edit/Cut'', aztán ráklattyantasz a groupboxra és ''Edit/Paste''.
  
  B verzió: használd az ''Object treeview'' panelt, azon működik a drag&drop.

• #874 btotyi tag Notes #868

  Új Válasz 2005-08-25 20:05:55 #874

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  btotyi

  tag

  válasz Notes #868 üzenetére

  Ha jól értem master-detail riportot szeretnél.
  
  A master táblát állítsd be a laphoz tartozó datasetnek, a detailt pedig egy detail-band-hez kösd hozzá.

• #800 g4dg3t senior tag Notes #790

  Új Válasz 2005-05-18 00:56:53 #800

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  g4dg3t

  senior tag

  válasz Notes #790 üzenetére

  A gond ott van hogy elobb hivatkozol a parameterekre es csak kesobb hozod oket letre. Mikor meghivod a ParamByName metodust az SQL stringnek mar tartalmaznia kell a lekerdezest a parameterhivatkozasokkal egyutt!
  
  Tehat helyesen:
  

  
  ...
  with Query1, SQL do begin
    Close;
    Clear;
    Add('SELECT *');
    Add('FROM TranzTabla');
    Add('WHERE (Datum>= :KezdDatum) AND (Datum<= :VegDatum)');
    if LekerdFelhComboBox.ItemIndex > 0 then
      Add('AND (Felhasznalo= :Felhaszn)');
    if LekerdPartnerComboBox.ItemIndex > 0 then
      Add('AND (Partner= :Partn)');
  
    ParamByName('Felhaszn').AsString:=LekerdFelhComboBox.Text;
    ParamByName('Partn').AsString:=LekerdPartnerComboBox.Text;
    ParamByName('KezdDatum').AsDate:=LekerdDatePicker1.Date;
    ParamByName('VegDatum').AsDate:=LekerdDatePicker2.Date;
  
    Prepare;
    Open;
  end;
  ...
  

  
  
  Lathatod azt is hogy mikor kell hivni a Prepare metodust (Open elott). Ez annyit csinal, hogy elore lefoglalja a Query futtatasahoz szukseges eroforrasokat igy a lekerdezes vmivel gyorsabban lefut!
  
  [Szerkesztve]
• #797 Robiba tag Notes #790

  Új Válasz 2005-05-17 23:37:15 #797

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Robiba

  tag

  válasz Notes #790 üzenetére

  Add ('AND (Felhasznalo= elhaszn)'); helyett
  Add ('AND (Felhasznalo='+QuotedStr(Felhaszn)+')');
  és ue. a Partn-nél is.
  
  Mivelhogy az SQL ott stringet vár.

• #208 <Adamsky> nagyúr Notes #207

  Új Válasz 2004-11-26 12:36:08 #208

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  <Adamsky>

  nagyúr

  válasz Notes #207 üzenetére

  Megtaláltam, de sajna nem igazán tudom, hogyan is tudnám én ezt használni.
  A helpben és a legtöbb példprogramban így találtam meg:
  ... TComponent(Sender).Tag ...

• #198 BlackWoOd aktív tag Notes #194

  Új Válasz 2004-11-24 18:33:21 #198

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  BlackWoOd

  aktív tag

  válasz Notes #194 üzenetére

  Hát, meglehet. 7-es verzióban benne van, de abban a 2.0-ás.
  Esetleg ha a Companion CD-n szétnézel, lehet, hogy ott van eldugva.
  (Nincs előttem 5-ös telepítő készlet, nem tudom megnézni sajna.)
  
  Viszont sem a borland.com-on sem a bdn.borland.com-on nem találok demo-letöltést. (Tuti, hogy volt trial változata, ide a rozsdás bökőt, ha nem...)
  
  szerk.: a 2.0 nem biztos, de tuti, hogy 1.0 fölötti volt.
  
  [Szerkesztve]

• #185 BlackWoOd aktív tag Notes #182

  Új Válasz 2004-11-22 17:33:44 #185

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  BlackWoOd

  aktív tag

  válasz Notes #182 üzenetére

  Model Maker erre van (Borland cucc, szintén. Demo/trial van a Delphi telepítő csomagban ill. azt hiszem, letölthető.)
  Ezt pont azt csinálja, ami neked kéne (forrás -> UML).

• #160 lao ce aktív tag Notes #159

  Új Válasz 2004-11-20 16:02:18 #160

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lao ce

  aktív tag

  válasz Notes #159 üzenetére

  hat arrol van elkepzelesem hogy en ezt hogyan csinalnam.
  kerdes amugy hogyha cmb1 = Kiss es cmb2 = Bela
  akkor az osszes kiss vagy bela kell megjelenjen vagy az osszes kis es bela?
  
  amugy a checkboxokat hanyagolnam, az elso item minden comboban lehetne (all) vagy (minden) valasztas. kevesebb objectum = egyszerubb interfesz.
  
  aztan kb... van egy sql valtozo, mondjuk aSQL
  a combokat elnevezheted ugy mint a fieldek nevei, de egy cmb-vel az elejen, tehat cmbFirstName, cmbKeresztnev
  
  az eleje az aSQL-nek valami ilyesmi lesz (megtartanam space-eket a ' jelek utan es elott!)
  
  aSQL := ' select f1, f2, f3, f4 from table where ';
  
  itt a datum
  aSQL := aSQL + ' ( DateField >= #' + MyDateObj1.Value + '# ';
  aSQL := aSQL + ' and DateField <= #' + MyDateObj2.Value + '# ) ';
  
  aztan ugyi... vegig egy for ciklussal a kombokon
  
  for i := 0 to ComponentCount-1 do begin
  ___currCompName := copy (Components.Name, 1, 3);
  
  ___currFieldName := copy(Components.Name,4, Length(Components.Name)-3 );
  
  aztan mikor komborol van szo es raadasul nem a (minden) van kivalasztva:
  
  ___if (currCompName = 'cmb') and
  ______((Components as TCombobox).ItemIndex > 0) then
  
  akkor hozzaadjuk az aSQL valtozohoz azt a feltetelt hogy ' and fieldname = ertek '.
  meg az is van hogy itt 'and' vagy 'or' attol fuggoen hogy kiss bela hogy kell megjelenjen az elso kerdesben.
  
  persze, ez nem ENNYIRE egyszeru mert lehet szam is meg text is meg date is a tipusa a dolognak. ez most text akar lenni de csak nem biztos hogy szintaktikailag helyesen irom.
  
  aSQL := aSQL + ' and ' + currFieldName + ' = ''' +
  Components as TCombobox)..Items.Strings [ (Components as TCombobox).ItemIndex] + ''' '
  
  aztan egy par end a vegere es lehet futtatni a query-t.
  
  
  [Szerkesztve]

• #158 lao ce aktív tag Notes #157

  Új Válasz 2004-11-20 15:23:55 #158

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lao ce

  aktív tag

  válasz Notes #157 üzenetére

  kivancsi vagyok hogy megkerdezed-e hogy mikor egy text field-del kitoltod a combot akkor hogyan tudod a hatterben az ID-ket karbantartani

• #156 lao ce aktív tag Notes #155

  Új Válasz 2004-11-20 15:06:53 #156

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lao ce

  aktív tag

  válasz Notes #155 üzenetére

  - en mindig sima combo-t hasznalok
  - az auto feltolteshez amugy is a DBLookupComboBox -t kellene hasznalni...
  - a dbcombonak igenis VAN itemindex-e, annyira elbizonytalanitottal hogy megneztem a helpben
  - szerintem (bar nem hasznalom) elallitodik, hiszen erre valo, hogy az itemindex-szel elallitodjon a db is, nem?

• #153 lao ce aktív tag Notes #152

  Új Válasz 2004-11-20 14:25:44 #153

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lao ce

  aktív tag

  válasz Notes #152 üzenetére

  valami elgepelesre gondolok.
  amugy ha a code completion kiirja neked hogy itemindex akkor van olyan (lesz olyan).

Új hozzászólás Aktív témák