Delphi, care lucrează cu combobox

Există două proceduri: pocedue BoxUp (va NB: TComboBox); begiwith NB do if (ItemIdex> 0) ItemIdex: = ItemIdex-1 altceva ItemIdex: = Items.Cout; ed; pocedue BoxDow (va NB: TComboBox); begiwith NB dacă (ItemIdex





Delphi: Delphi, care lucrează cu ComboBox

Programul privind Delphi, Esența programului este după cum urmează: În numele lui Edith a intrat și apoi a atribuit un rând. Cu ajutorul unor modificări algoritm la sfârșitul liniei și numele devine în Padezhe.Problema genitiv este după cum urmează: compilatorul nu-i place faptul că lucrez cu caractere rusești, și pur și simplu nu se execută programul, cu problema de codificare, în general. Am pus într-un algoritm-engleză caractere - toate compilate fără tipuri de problem.Proboval stig și asistig - odinakovo.Chto poate face în acest caz?







Te rog ajută-mă să înțeleg cum funcționează Delphi cu porturile COM. Pe Internet multe despre el este scris, dar nu prea înțeleg, nu există nici un exemplu bun. Vă rog, dacă nu este dificil, scrieți un exemplu, să spunem cum să utilizați Delphi pentru a trimite un singur port.

Te rog spune-mi cum să lucreze cu ferestre Delphi de alte programe, vreau să spun, de exemplu, a crea o fereastră nouă de browser-ul meu selectat în cererea mea, numai fereastra fără control vizual, care a lucrat cu DiectShow ar trebui să înțeleagă ceea ce am govoryu.P.S. Este imposibil să exprimi corect o idee, dar sper că întrebarea este clară.

113074 113258 225130

matoni (Guest) Acum 3 ani

Count - numărul de elemente și indexează elementele de la 0. Ie. 8 un element, iar acesta din urmă are un indice de 7. \ u003d ItmeIndex nu va fi mai mic decât / Items.Count egal. În consecință, este imposibil să furnizăm itemindex mai mare decât Items.Count-1
procedura BoxUp (var NB: TComboBox);
începe
cu NB face
dacă (ItemIndex0) apoi ItemIndex: \ u003dItemIndex-1
altfel ItemIndex: \ u003dItems.Count-1;
se încheie;

procedura BoxDown (var NB: TComboBox);
începe
cu NB face
dacă (ItemIndex \ u003cItems.Count-1)
apoi ItemIndex: \ u003dItemIndex + 1
alt articol ItemIndex: \ u003d0;
se încheie;

Răspundeți la întrebare







Articole similare

Pagina anterioară

Pagina următoare

Trimiteți-le prietenilor: