x-kom hosting

Błąd w delphi

benkowik
utworzono
utworzono

Witam,

Chcę żeby na pasku pisało mi napis jaki podam. Więc daje takie coś i wyświetla mi błąd:

bad2cg2.jpg

Chodzi mi o tą linijkę gdzie jest

beginCaption := Notatnik;end;

A tak wygląda wszystko:

unit Notatnik;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls, ComCtrls, ToolWin, ExtCtrls;type  TTextEdit = class(TForm)	ControlBar1: TControlBar;	Tools: TToolBar;	HelpBar: TStatusBar;	RichEdit1: TRichEdit;	procedure HelpBarCreatePanelClass(Sender: TCustomStatusBar;	  var PanelClass: TStatusPanelClass);  private	{ Private declarations }  public	{ Public declarations }  end;var  TextEdit: TTextEdit;implementation{$R *.dfm}procedure TTextEdit.HelpBarCreatePanelClass(Sender: TCustomStatusBar;  var PanelClass: TStatusPanelClass);beginCaption := Notatnik;end;end.

Jest to tylko szkielet programu. :)

P.S

Jaka jest procedura do pogrubienia tylko zaznaczonego teksu ? Chodzi mi naciskam Button jakiś tam i tekst mam progrubiony ? To samo do pochylenia i podkreślenia :)

Tomek
komentarz
komentarz

Zobacz w cudzysłowie wyraz "notatnik"

benkowik
komentarz
komentarz

Ok zobaczę :)

A wiesz może jak z tym pogrubieniem, podkreśleniem, pochyleniem ?

grucha
komentarz
komentarz

Co do Twojego pierwszego problemu: apostrofy. Przypisujesz do właściwości coś czego nie ma czyli nie jest żadną zmienną ani konkretną wartością.

Co do Twojego drugiego problemu:

 RichEdit1.SelAttributes.Style:=[fsBold]

Takie proste rzeczy... Google nie gryzą ;]

benkowik
komentarz
komentarz

Widzę że znasz się na rzeczy. A możesz mi powiedzieć czym się różni Delphi 7 od Delphi 5 ?

grucha
komentarz
komentarz

Heh, nie wymienię Ci dokładnie co się zmieniło bo nie wiem i nie pamiętam, bo już dawno czytałem o różnicach między kolejnymi wersjami. Jak to przeważnie bywa poprawiono deburgger, VCL pewnie wnieśli jakieś poprawki do Object Pascala, poprawili zgodność z XML i usługami bazodanowymi itd. itp. Na prawdę nie wiem dokładnie co zmienili ;] Ja zawsze używam najnowszej wersji, a Delphi w wersji 5 to już trochę zabytek, w końcu ma już 9 lat ;]

benkowik
komentarz
komentarz

Ale te kody co są z 5 będą działały na kompilatorze od 7 ? Bo mam książkę do 5 i legalny kompilator do 7 :D

grucha
komentarz
komentarz

Tak, będą działały

benkowik
komentarz
komentarz

Ok. Prawie cały dzień posiedziałem i coś tam śmiga :P jednak mam ciągle jeden problem :( Dlaczego gdy mam ustawiony filtr na .txt zapisu mi tak nie zapisuje ? Gdy zapisz tekst i ręcznie dodam .txt to działa. Wszystko chyba dobrze mam.

21201995tj4.jpg.

procedure TTextEdit.Zapiszjako1Click(Sender: TObject);beginif SaveDialog.Execute then	RichEdit1.Lines.SaveToFile(SaveDialog.FileName);	Caption := ExtractFileName(SaveDialog.FileName) + ' - ' + 'AppName';	RichEdit1.Modified := False;end;

Wciąż szukasz rozwiązania problemu? Napisz teraz na forum!

Możesz zadać pytanie bez konieczności rejestracji - wystarczy, że wypełnisz formularz.

×
×
  • Dodaj nową pozycję...

Powiadomienie o plikach cookie

Strona wykorzystuje pliki cookies w celu prawidłowego świadczenia usług i wygody użytkowników. Warunki przechowywania i dostępu do plików cookies możesz zmienić w ustawieniach przeglądarki.