Merkkivalikoiman kertova apuohjelma
Tuleeko windowsin mukana valmiiksi tällaista apuohjelmaa ?
Itse en ole sellaista valmiina löytänyt, joten seuraavassa pieni Delphillä tehty ohjelmanpätkä, jonka voit luoda seuraavasti:
1. Luo uusi Delphi -projekti (GUI).
2. Lisää formille painonappi, halutessasi muuta sen Name ja Caption -ominaisuudet, ja tuplaklikkaaa ko. nappia
3. Laita napin tapahtumakäsittelijään allaolevan mukainen sisältö:
procedure TfrmWebDl.bnCharsetClick(Sender: TObject);
const
DescURL = 'http://msdn.microsoft.com/en-us/library/ms776446(VS.85).aspx';
var
CharacterSetCode : Cardinal;
St1 : String;
begin
CharacterSetCode := GetACP;
St1 := 'Käytetyn merkkivalikoiman koodi on ' IntToStr(CharacterSetCode);
St1 := St1 ^M^J 'Koodien selitykset löytyvät osoitteesta: ' DescURL;
ShowMessage(St1);
end;
Tuleeko windowsin mukana valmiiksi tällaista apuohjelmaa ?
Itse en ole sellaista valmiina löytänyt, joten seuraavassa pieni Delphillä tehty ohjelmanpätkä, jonka voit luoda seuraavasti:
1. Luo uusi Delphi -projekti (GUI).
2. Lisää formille painonappi, halutessasi muuta sen Name ja Caption -ominaisuudet, ja tuplaklikkaaa ko. nappia
3. Laita napin tapahtumakäsittelijään allaolevan mukainen sisältö:
procedure TfrmWebDl.bnCharsetClick(Sender: TObject);
const
DescURL = 'http://msdn.microsoft.com/en-us/library/ms776446(VS.85).aspx';
var
CharacterSetCode : Cardinal;
St1 : String;
begin
CharacterSetCode := GetACP;
St1 := 'Käytetyn merkkivalikoiman koodi on ' IntToStr(CharacterSetCode);
St1 := St1 ^M^J 'Koodien selitykset löytyvät osoitteesta: ' DescURL;
ShowMessage(St1);
end;
Vastaukset
Vanhimmat
Ei vielä vastauksia
Aloittaja odottaa vastauksia. Kerro oma näkemyksesi ensimmäisenä.