27. august 2002 - 15:12Der er
15 kommentarer og 2 løsninger
synedit
Jeg har et synedit felt hvor jeg vil have at når man trykker på en knap så indsætter den det der står i knappen, i synedit feltet. Den syn edit bliver oprettet ved hjælp af denne kode:
procedure TForm1.FormCreate(Sender: TObject); var tabsheet : Ttabsheet; edit : TSynEdit; begin TabSheet := TTabSheet.Create(self);
Normalt kan man vel gøre sådan her synedit1.lines := 'det der skal indsættes'; men det kan man ikke pga. at min synedit bliver oprettet på den måde som den nu gør.
[Warning] Unit1.pas(71): Variable 'tabsheet' might not have been initialized [Error] Unit1.pas(142): Incompatible types: 'TStrings' and 'String' [Error] Unit1.pas(46): Unsatisfied forward or external declaration: 'TForm1.TBItem11Click' [Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
[Warning] Unit1.pas(71): Variable 'tabsheet' might not have been initialized Fortæller dig at det ikke er sikkert at din tabsheet er blevet initialiseret... Husk også at sætte en parent til den og eventuelle størrelses egenskaber...
[Error] Unit1.pas(142): Incompatible types: 'TStrings' and 'String' Brug TStrings.Add(String); Altså i dit tilfælde: edit.Lines.Add('HEST!');
[Error] Unit1.pas(46): Unsatisfied forward or external declaration: 'TForm1.TBItem11Click' Du har en procedure (eller funktion) som kun er deklereret, men ingen kode er skrevet til den...
Lav det således: procedure TBItem11Click(Sender: TObject); {Går ud fra den ser sådan ud da den stammer fra et klik af en art... Delphi opretter selv deklerationen til denne under formens properties, men af og til er der problemer med at oprette den senere... (don't ask me why)}
procedure TForm1.TBItem11Click(Sender: TObject); begin ShowMessage('Min procedure er skrevet, og programmet virker!!! HURRA!!!'); end;
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas' Opstår fordi din Unit1.pas-fil ikke kunne kompileres og dermed kunne Delphi ikke lave programmet for dig...
Når jeg bruger edit.Lines.Add('HEST!'); kommer den med en fejl når jeg trykker på knappen. Prpject project1.exe raised eception class EaccessViolation wiyh massege OG så er der en blå merkering over edit.Lines.Add('HEST!');
ha ha, den var faktisk meget god. Jeg bruger ikke den funktion mere, men du får 15 points for den "joke".
/fun22
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.