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

• #1530 Rolly veterán g4dg3t #1529

  Új Válasz 2007-04-06 08:21:56 #1530

  Ú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

  

  Rolly

  veterán

  válasz g4dg3t #1529 üzenetére

  és olyat lehet, hogy ezután a gomb neve alapján fotassa?
  
  olyanra gondolok, hogyha entert üt, akkor ha a size nevű editet szekesztettük, akkor a size értéke legyen, ha a size2-t akkor a size kettőé.

• #1528 Rolly veterán g4dg3t #1525

  Új Válasz 2007-04-05 18:54:18 #1528

  Ú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

  

  Rolly

  veterán

  válasz g4dg3t #1525 üzenetére

  nekem ezt kb 60 gombra kell megcsinálnom, ezt hogyan lehetne valami kis trükkel egyszerűen megoldani?

• #1526 Rolly veterán g4dg3t #1525

  Új Válasz 2007-04-05 11:57:11 #1526

  Ú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

  

  Rolly

  veterán

  válasz g4dg3t #1525 üzenetére

  más future nem fog kelleni.
  
  köszi a kódot

• #1443 Rolly veterán g4dg3t #1442

  Új Válasz 2007-01-16 17:27:01 #1443

  Ú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

  

  Rolly

  veterán

  válasz g4dg3t #1442 üzenetére

  pont nem szerepelhet egy sorban korábban mint az első float érték, ez az adat szabványa miatt van.

• #1441 Rolly veterán g4dg3t #1440

  Új Válasz 2007-01-16 16:07:15 #1441

  Ú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

  

  Rolly

  veterán

  válasz g4dg3t #1440 üzenetére

  úgy szerinted nem jó ha poszal megkeresem az első pontot, s index-1től kopizok?
  
  illetve a fájl valahogy így néz ki
  
  tipus [
  szin bela 0.0 0.0 0.0
  .
  .
  .
  ]
  {
  }
  
  s csak a két [] jel között kell keresnem.
  csináltam egy while ciklust, s ha pos('[',sor)<>0 addig dolgozza fel de mégsem jó

• #1097 mandrake83 csendes tag g4dg3t #1096

  Új Válasz 2006-01-23 13:43:20 #1097

  Ú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

  

  mandrake83

  csendes tag

  válasz g4dg3t #1096 üzenetére

  Köszönöm szépen! Tökéletes a megoldásod! Tényleg köszi!
  Működik is ahogy kell !!!!
  
  [Szerkesztve]

• #806 Notes senior tag g4dg3t #801

  Új Válasz 2005-05-19 09:35:40 #806

  Ú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

  

  Notes

  senior tag

  válasz g4dg3t #801 üzenetére

  Köszi! Végre életet leheltél a fórumba!
  
  Végül így oldottam meg (Thx to prog.hu community!):
  

  
  Begin
  Close;
  Clear;
  
  Add('SELECT *');
  Add('FROM TranzTabla');
  Add('WHERE (Datum>= :KezdDatum) AND (Datum<= :VegDatum)');
  
  If LekerdFelhComboBox.ItemIndex>0 Then
  Add ('AND (Felhasznalo= '+ Quotedstr(LekerdFelhCombobox.text)+')');
  If LekerdPartnerComboBox.ItemIndex>0 Then
  Add ('AND (Partner= ' + Quotedstr(LekerdPartnerCombobox.text)+')');
  If LekerdCimletCombobox.Itemindex>0 Then
  Add ('AND '+ VPDataModule.TranzTabla.Fields[(LekerdCimletComboBox.ItemIndex)+5].FieldName +' is not null');
  Prepare;
  ParamByName('KezdDatum').AsDate:=LekerdDatePicker1.Date;
  ParamByName('VegDatum').AsDate:=LekerdDatePicker2.Date;
  
  Open;
  end;
  end;
  

  
  
  Ez egy DBGrid-re irányítva hibátlanul működik. De ha a Query-t egy Reportra teszem és annak az OnPreview eseményekor hívom meg a fenti kódot, akkor mindig csak a feltételeknek elsőként megfelelő rekord jelenik meg, de az annyiszor, ahány rekord megfelel az SQL statement-nek. Nem tudom ez így érthető-e?
  Az egyik könyvben azt olvastam, hogy a Query-hez kapcsoljak DataSource-t is. Minek? Lehet közvetlenül is hivatkozni rá nem?
  
• #802 yksz aktív tag g4dg3t #798

  Új Válasz 2005-05-18 18:15:20 #802

  Ú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

  

  yksz

  aktív tag

  válasz g4dg3t #798 üzenetére

  Kosz a segítséget és tényleg arra kéne, csak nekem a folyamatok kozul is el kéne tuntetni, nem csak az alkalmazások kozul. Ez megoldható vhogy?

• #801 g4dg3t senior tag g4dg3t #800

  Új Válasz 2005-05-18 09:36:39 #801

  Ú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 g4dg3t #800 üzenetére

  
  ooo ize
  
  Epp most latom a sajat kodomban...a Prepare-t meg a ParamByName metodusok elott szokas hivni! Sry a pontatlansagert...tegnap ejjel mar picit faradt voltam
  

• #658 killerjohn addikt g4dg3t #657

  Új Válasz 2005-03-11 13:09:02 #658

  Ú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

  

  killerjohn

  addikt

  válasz g4dg3t #657 üzenetére

  ok. megbeszéltük. peace.

• #655 killerjohn addikt g4dg3t #652

  Új Válasz 2005-03-11 13:05:46 #655

  Ú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

  

  killerjohn

  addikt

  válasz g4dg3t #652 üzenetére

  VCL :
  
  TForm
  
  property Components[Index: Integer]: TComponent read GetComponent;
  
  function TComponent.GetComponent(AIndex: Integer): TComponent;
  begin
  if FComponents = nil then TList.Error(@SListIndexError, AIndex);
  Result := FComponents[AIndex];
  end;
  
  
  function TComponent.FindComponent(const AName: string): TComponent;
  var
  I: Integer;
  begin
  if (AName <> '') and (FComponents <> nil) then
  for I := 0 to FComponents.Count - 1 do
  begin
  Result := FComponents;
  if SameText(Result.FName, AName) then Exit;
  end;
  Result := nil;
  end;
  
  
  a függvényhíváson belül már a saját, közvetlen elérésű adattagjával dolgozik az osztály, és nem a GetComponent függvényen keresztül ad vissza értéket, amikor a Components[] tömb elemeit olvasod....
  
  Tehát még gyorsabb is.
  
  

• #654 killerjohn addikt g4dg3t #652

  Új Válasz 2005-03-11 13:02:39 #654

  Ú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

  

  killerjohn

  addikt

  válasz g4dg3t #652 üzenetére

  kisebb lesz a kód. áttekinthetőbb. moduláris programozás.

• #653 killerjohn addikt g4dg3t #649

  Új Válasz 2005-03-11 13:01:41 #653

  Ú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

  

  killerjohn

  addikt

  válasz g4dg3t #649 üzenetére

  aha! lehagyta a zárójelet az elejéről.

• #651 Diskcopy tag g4dg3t #649

  Új Válasz 2005-03-11 13:01:22 #651

  Ú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

  

  Diskcopy

  tag

  válasz g4dg3t #649 üzenetére

  Oké, de a másik verzió is jó, nem? mármint a Timage(Form1.FindComponent('Image'+IntToStr(i))).Picture.Bitmap := TBitmap.Create;
  Igen, a másiknál valszínüleg zárójeles hiba volt a ludas.

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