Autor Téma: Nejake nejasnosti ohledne zacatku programovani v Delphi.  (Přečteno 3638 krát)

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #45 kdy: 04-12-2021, 20:52:45 »
zkusil jsem toto
Kód: Delphi [Vybrat]
  1. procedure TForm5.Button2Click(Sender: TObject);
  2.     begin
  3.       if bts.Count > 1 then
  4.       begin
  5.          bts[0].Free;
  6.          bts.Delete(0);
  7.       end;
  8.     end;[\code]
  9.  
A to je poriadna kravina. Nečítaš s porozumením. Ty si viac natvrdlý než som bol je. A že si to tu so mnou užili. Ty ma prekonávaš o dve triedy. Citát: Pan velebnej, jdu blejt (ospravedlňujem sa za prípadne zlú češtinu)
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #46 kdy: 04-12-2021, 20:54:28 »
Citace
Co s nimi a jak to souvisi s chybou AV ?
Samozrejme, že nijako. Pozri príspevok #39
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #47 kdy: 04-12-2021, 21:02:46 »
Mas tam

Kód: Delphi [Vybrat]
  1.       bts[0].Free;  //  tým je hodnota bts[0] nil
  2.      
  3.       bts.Delete(0);  //  nič tu nie je. Nutne musíš dostať AV (Access Violation)
  4. [\code]
  5.  
  6. Nevim, jak to spravit  :(
  7.  
  8.  
  9.  
  10.  
  11.  
« Poslední změna: 04-12-2021, 21:05:15 od max2 »

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #48 kdy: 04-12-2021, 21:12:15 »
Udelal jsem toto
Uz to nepada ale nevytvareji se nove Tedity

Kód: Delphi [Vybrat]
  1.  begin
  2.      bts := TList<TButton>.Create;
  3.     //ShowMessage('aa1');
  4.  
  5.       tmp := TButton.Create(Self);
  6.      //        ShowMessage('aa2');
  7.       tmp.Parent := Self;
  8.        //                     ShowMessage('aa3');
  9.       tmp.SetBounds(bts.Count*50, 10, 40, 40);
  10.       //ShowMessage('aa4');
  11.       tmp.Caption := 'Hey jude';
  12.       //ShowMessage('aa5');
  13.       bts.Add(tmp); // pridame do seznamu buttonu
  14.     end;
  15. [\code]

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #49 kdy: 04-12-2021, 21:15:30 »
To si na zlom príspevku. Ten len vysvetľuje chybu. Zničenie je v inom.
Dal som tu upravený formulár. Rozšíril som funkčnosť.
Odteraz sa bavím len o vlastnom formulári a o tom čo urobíš v ňom. Prosím Ťa, rozumieš?
.
Ak Ti podľa čísla nesedia príspevky, tak najprv skontroluj svoje nastavenie. Urobil si To? Ináč Ti nikdy nebudú sedieť čísla.
.
Tento príspevok musí byť úplne hore.
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #50 kdy: 04-12-2021, 21:20:59 »
Excellent
Rated 1 time
Ak to máš doslovne tak, ako si to uviedol tu, tak:
  • Edit sa vždy vytvoria
  • Nasúkajú sa do stohu jeden na druhý. Vidíš len posedný
  • To by si zistil, keby si tam vrazil vždy iný text
  • Moja posledná reakcia na Tvoj výtvor
Uvedom si, že ak Ťa o niečo žiadam, dokonca už prikazujem, tak mám na to vážne dôvody. Ty ich zistíš až neskôr!!! Ostatní vedia o čo ide :D
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #51 kdy: 04-12-2021, 22:03:30 »
Mam hacknuty komp.
Jeden z nas mluvi o zivote a druhy o programovani.
 8) 8) 8)

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 3004
  • Karma: 108
    • Verze Delphi: D2007, DXE + 2 poslední
    • O Delphi v češtině
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #52 kdy: 05-12-2021, 12:12:38 »
Stando: to byl muj kod, takze pro upresneni:
Kód: Delphi [Vybrat]
  1.  
  2.    bts[0].Free;  //  uvolni tlacitko ktere je na pozici 0
  3.    bts.Delete(0);  //  odstrani z listu 0 polozku (je na ni to uvolnene tlacitko)
  4.  

Ten test pred tim tj. if bts.Count > 0 then znamena jen test ze tam je aspon jedna polozka. A nez jsem mu to poslal, tak jsem to zkusil :-)
Embarcadero MVP - Czech republic

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #53 kdy: 05-12-2021, 12:32:12 »
Tak to si sypem popol na hlavu :-[  Až teraz som si uvedomil, že druhý riadok vymaže položku, ale nič nerobí s obsahom! Lenže on neskôr urobil nasledovné: if bts.Count > 1. Na to som reagoval už silnejšie. Len som presne nešpecifikoval o čom píšem ???
« Poslední změna: 05-12-2021, 12:34:16 od Stanislav Hruška »
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #54 kdy: 05-12-2021, 15:45:45 »
Mam na Vas dve prosby.
Muzete mi sem hodit nekdo cely funkcni kod (ten si podrobne nastuduji), ktery by jel uz bez meho zasahu (zadny .rar)?
A pak mi rict co zpusobuje tuto chybu:

V prvni priloze ta zahadna chyba a ve druhe Design,ktery potrebuji obsluhovat.
« Poslední změna: 05-12-2021, 15:48:10 od max2 »

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #55 kdy: 05-12-2021, 15:59:05 »
muj prozatimni kod vypada takto

 
« Poslední změna: 05-12-2021, 16:16:20 od max2 »

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #56 kdy: 05-12-2021, 16:06:56 »
Potrebuji tam tedy jen pridat to ruseni tech tlacitek.

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #57 kdy: 05-12-2021, 16:14:03 »
Mal som napísaný príspevok, ale mi ho zrušilo. Dám do prílohy zip súbor. Musím formulár spakovať, lebo sa tu ináč nedá vložiť. To bol dôvod zrušenia príspevku.
Ty tam toho potrebuješ viac než si myslíš!
Teraz tu okamžite daj svoj dpr súbor a nič nerob!!!!!!!!!!!!! Ostatné potom. Rýchlosť záleží len na Tebe ;D
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Online Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 6146
  • Karma: 44
    • Verze Delphi: W10 + D11
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #58 kdy: 05-12-2021, 16:16:23 »
Ukážka ako vyzerá môj formulár za behu + vytvorené tlačidlá
W10 64b, Delphi 10.4, FireBird 3.08
Expert na kladenie nejasne formulovaných otázok.

Offline max2

  • Mladík
  • **
  • Příspěvků: 82
  • Karma: 0
    • Verze Delphi: RAD Studio 10.2
Re:Nejake nejasnosti ohledne zacatku programovani v Delphi.
« Odpověď #59 kdy: 05-12-2021, 16:42:24 »
Necekal jsem takto komplexni projekt !!

Lepsi se to: zadna chyba a vsechny soubory na svem miste.

Ma to ale chybu, po spusteni se neukaze to kyzene okynko.  :(