Znak "Delty"

Odpowiedz Nowy wątek
2006-09-26 09:46
0

Czołem!
Czy ktoś wie, w jaki sposób wstawić programowo - za pomocą kodu ASCII lub innego - znak greckiej litery delta-dużej! Muszę ją wyświetlić w komórce StringGrid'a razem z innym - polskim- textem.

Pozostało 580 znaków

2006-09-26 10:09
0

Za litery greckie odpowiedzialna jest czcionka symbol.


<span style="color: blue">"Kolarstwo to jedna z najtrudniejszych dyscyplin sportu. Nawet najgorszy kolarz jest wciąż wybitnym sportowcem."
s.p. Marco Pantani
</span>

Pozostało 580 znaków

2006-09-26 10:48
Ad
0

W czcionce Symbol delta ma taki sam kod ASCII jak w normalnych czcionkach D, czyli #68


Pozostało 580 znaków

2006-09-26 13:49
0

O.K. To wiem, ale konkretnie chodzi mi o zapis: "cells[7,IleRec+2]:= 'DU='+' '+FloatToStrF(DU,ffGeneral,3,2);" gdzie to nieszczęsne 'D' powinno wyglądać jak namiocik! Możliwe jest użycie w tym przypadku czcionki symbol? Jeśli tak to poproszę o przykład. :-)

Pozostało 580 znaków

2006-09-26 14:52
0
StringGrid1.DefaultDrawing := FALSE;
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var w:integer;
begin
if ACol=1 then
  begin
  StringGrid1.Canvas.Font.Name:='Symbol';
  w:=StringGrid1.Canvas.TextWidth('D');
  StringGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, 'D');
  StringGrid1.Canvas.Font.Name:='Ms Sans Serif';
  Rect.Left:=Rect.Left+w;
  StringGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, 'U = 1.00000000000');
  end
else
  begin
  StringGrid1.Canvas.Font.Name:='Ms Sans Serif';
  StringGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, StringGrid1.Cells[ACol, ARow]);
  end;
end;

Tylko, że w ten sposób wszystkie kratki będziesz musiał ręcznie odmalować.


<font color="red">Konto porzucone</span>

Dzięki wszystkim forumowiczom za lata wspólnych dyskusji; miłej zabawy w programowanie!
Sławomir 'Szczawik' Włodkowski

Pozostało 580 znaków

2006-09-27 07:00
0

Szczawik! Niech Cię uściskam!! Dokładnie o to mi chodziło! [green] Serdeczne dzięki za listing. [browar]

Pozostało 580 znaków

Odpowiedz
Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0