Witam!
Czy jest w Delphi funkcja konwerująca typ Char na Byte ?
Czy po prostu bede ja musial 'stworzyc' :-)
F1 stosowalem i jakos nie moglem sie dokopac [???]
pozdrówka
...:::RaBBiT:::...
Witam!
Czy jest w Delphi funkcja konwerująca typ Char na Byte ?
Czy po prostu bede ja musial 'stworzyc' :-)
F1 stosowalem i jakos nie moglem sie dokopac [???]
pozdrówka
...:::RaBBiT:::...
Hm...
Chr(65) = 'a'
Ord('a') = 65
[dopisane]
podstawy... :-/
Mnie chodziło o coś innego. Wyjasnie więc.
procedure TForm1.Button1Click(Sender: TObject);
var
A: String;
B: Byte;
C: Char;
begin
A := InputBox('Konwersja','Podaj liczbe z zakresu ','0');
{Chodzi mi o to ze chce bezsposrednio przypisac do zmiennej C powyzszy kod ( InputBox('.......)), ale jak wiadomo ta funkcja zwraca wynik typu String}
{chodzi o to czy istnieje coś a'la "StrToInt" np.: "CharToByte" i vice versa, prawdopodobnie trzeba sobie sklecic funkcje samemu ale jestem dopiero raczkujacy :)}
B := StrToInt(A); //mozna wprost -->
// B:=StrToIntInputBox.....itd, ale jest czytelniej :)
C := Char(B);
Edit1.Text := C;
end;
.....::: Problem drugi - to odwrotna sytuacja :::....
na typach String, Integer to poradze sobie - ale dalej mnie nurtuje konwersja tych typow [chomik] :-/
pozdrawiam
P.S. Namieszalem moze bo pospiech mnie goni czyli modem :-[
RaBBiT
Chodzi mi o to ze chce bezsposrednio przypisac do zmiennej C powyzszy kod ( InputBox('.......)), ale jak wiadomo ta funkcja zwraca wynik typu String}
C := Chr(StrToInt(InputBox('Konwersja','Podaj liczbe z zakresu ','0')));
//Tak na marginesie: to mój post nr 500 :-) (Jest prawie 4 w nocy, a na 9 wykład. Idę B-|