În acest articol, voi încerca să explic principiile de programare din Delphi
Astăzi vom examina mijloacele de comparare a șirului. Și astfel, există două metode de comparare a șirurilor de caractere:
egal - doar compară liniile
compareTo - determină ce șir este mai mare. Pentru această metodă compară mai întâi primele litere ale liniilor, apoi a doua și așa mai departe până când ajunge la capătul liniei sau nu se va întâlni diferența. Cu cât este mai mare linia, al cărei simbol este mai mare în ordine alfabetică.
Iar acum ia în considerare un exemplu:
clasa publică StringCompareApplet extinde Applet
Etichetă etichetă = etichetă nouă ("Linie:");
textField1 = TextField nou (20);
label = noua etichetă ("Substring:");
textField2 = TextField nou (20);
buton = buton nou ("Comparare");
acțiunea booleană publică (Event evt, Object arg)
String str1 = textField1. getText ();
String str2 = textField2. getText ();
în cazul în care (. str1 este egal cu (str2)) disp1 = "linii sunt"; altfel disp1 = "linii nu sunt egale";
disp2 = "Rezultatul comparării șir" + res;