Hvis du skal bruge variablen i 2 eller flere procedurer, skal den defineres øverst i programmet under PUBLIC. Eks. public NyTabnr : integer; MinTaller : integer; Mvh Pjotre
kode: public var user: string; var room_id: string; end;
fejl: [Error] Unit1.pas(27): 'END' expected but 'VAR' found [Error] Unit1.pas(29): 'IMPLEMENTATION' expected but ';' found [Error] Unit1.pas(34): '.' expected but 'IMPLEMENTATION' found
Hvis du ønsker at skjule et felt, label skal du sætte visible := false; Eks. Edit1.visible := false; // du skjuler feltet Edit1.visible := true; // du viser feltet igen Mvh Pjotre
Ønsker du at referere til felter i form2, når du står i form1? Så gør du sådan: 1. i form1 skriver du: uses Form2; // her fortæller du at du vil referere til Form2. 2. TForm2.Edit1.text := 'hejsa'; // TFORM2 er det du har kaldt Form2. Mvh Pjotre
Du starter delphi med en tom form (form1 - unit1), og så opretter du en ekstra form med det samme (form2 - unit2).
Lige efter implementation i unit 1 skriver du:
uses unit2;
Hvis du sætte en button på form1 og en label på form2, kan du f.eks gøre således:
procedure TForm1.Button1Click(Sender: TObject); begin Form2.show; Form2.label1.caption := 'Hej'; end;
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.