Sende font.style over en socket?

fontstyle er en enumeration - men egentlig bare en integer. Du kan få integerværdien med funktionen Ord(), så for at sende den som tekststreng skal du bare skrive:

clientsocket1.socket.sendtext(IntToStr(Ord(Richedit1.font.color.Style)));

når du skal den anden vej dvs. lave en integer om til en enumeration skriver du:

Richedit1.font.style = TFontStyle(myint);

Det virker ikke det der.
I skal vide jeg bruger delphi 6PE, da jeg ikke er faldet i god jord med delphi 7.
Jeg skriver det, men det eneste den tillader er font.name.

Hey !!! Kom lige forbi.

Du skal konvetere din set til en integer, for så at sende den over nettet, og konvetere tilbage på den anden side.

Jeg har engang skrevet en artikkel om det :
http://www.pythia.dk/artikler/vis_artikel.php?id=26

Jens B

Hvis du så i det jeg har skrevet oppe i tråden, så har jeg konverteret andre ting til Integer og konverteret det tilbage, da man skal gøre det med .font.size, men det du har lavet har intet med .font.style at gøre.
Den der hedder .font.style er normalt= [] og kursiv= [Italic] osv, så jeg skal sende denne let.
Jeg kan ikke konvertere den til en integer, så ville der intet problem være jo.

stef_s>> Har du overhovedet læst den artikkel jeg linker til ?

Hvis du kigger i  Graphics.pas vil du opdage at FontStyles er defineret således :

TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut);
TFontStyles = set of TFontStyle;

Bemærk  Pluralis  : TFontStyles kontra  Singularis : TFontStyle

Og ser du her har du netop min pointe. TFontStyles er et sæt, og med min artikkel i hånden er det næsten for nemt at konvetere et sæt til en integer.

type
pFontStyles = ^TFontStyles;
pInteger = ^Integer;

function IntToFontStyles(const Value : Integer) : TFontStyles;
begin
  Result := pFontStyles(@Value)^;
end;

function FontStylesToInteger(const Value : TFontStyles) : Integer;
begin
  Result := pInteger(@Value)^;
end;


Jens B

okok svar, så du kan få point, men dog var den ikke lige så enkelt som jeg kunne ønske.

Enkelt ? Du får det da ikke meget nemmere.

Lige en ting så, jeg har lige sendt dig en mail med en mindra fejl i artiklen.
Men ikke det der var spørgsmålet; Nu er det der er mange muligheder, da det ikke kune er Italic eller Bold men også kan være dem sammen, altså mange kombinationer.
Men jeg ved godt hvordan jeg laver tekst om til tal, og om igen, men jeg kan ikke på nogen måde udrette fontdialog1.font.style til noget andet, end en lignende font.style på et andet komponent. Hjælp mig lidt her tak.

Lige et add, jeg ville undgå alle de IF funktioner, derfor jeg gerne ville sende det mere direkte.

det er fontStyles du sender over din socket.  Bemærk  Pluralis.
Den konveterer du frem og til bage til en integer. Det var DET der var det smarte.

Jens B

Jeg har forstået din mening med at konvertere ind til en integer, men så måtte spørgsmålet være, hvordan jeg kan vise mit richedit1.font.style.
Jeg laver en anden tråd så.