stringi delphi

[DELPHI] Odbieranie stringów o zmiennej długości w IdTcpClient (INDY 10)

1.Wstaw IdGlobal do Uses to będziesz mógł korzystać z formy jaką Ci napisałem; 2.Zrób odczyt w oddzielnym wątku (TThread) to program nie będzie się wieszał; 3.Ustaw ConnectTimeout i ReadTimeout dla TCPClient1 (w milisekundach); 4.Program oczekuje na string'a zakończonego CRLF. Jak ustawisz timeout'y (pkt.3) to będzie czekał tylko zadany czas. Pozdrawiam...

Jak zaszyfrować stringi w Bascom dla transmisji RS232 między uC?

sposób który podał mirekk36 jest świetny staram sie tylko go przełozyc na bascom dopiero zaczynam z delphi :(

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

[Delphi] W jaki sposób obsłużyć StatusBar i Tray?

co do statusbara to będzie tak: dodajesz sobie "panele" w statusbarze i piszesz takie coś: form1.StatusBar1.Panels[tutaj nr panela liczony od zera].text:=zmienna typu string; rozbicie daty i godziny na kolejne "stringi" jest pięknie opisane w helpie, służy do tego funkcja "datetostr" i "timetostr" co do tray'a to najlepiej jest zastosować jakiś komponent...

[Delphi] Jak zapisać tablicę rekordów studentów do pliku txt w Delphi?

Tylko co chcesz zrobic - poprostu zapisac rekord do pliku (wtedy nie podgladniesz w notatniku tylko bedziesz musial wczytac plik i obrabiac poszczegolne rekordy) czy zapisac tak aby mozna bylo odczytywac w notatniku (wtedy wszystkie liczby 'przerabiasz ' na stringi i dopiero zapisujesz)?

[Delphi] Jak w Delphi policzyć linie w pliku txt i wyświetlić ich ilość?

Nie za bardzo czaję C, ale z tego co zrozumiałem, to ta metoda nie jest zbyt "elegancka". Tworzysz dodatkowy obiekt (typu TStringList), z którego wykorzystujesz tylko jedną własność (no chyba, że w dalszej części programu operujesz na stringach wykorzystując ten obiekt)....

Sterowanie komponentami w Delphi za pomocą dynamicznych bibliotek DLL

Nie wiem, czy nie bezpieczniej byłoby użyć wyłącznie wskaźnika i rzutowania (timer: Pointer; TTimer(timer).Enabled:=false). Biblioteki DLL bardzo nie lubią niestandardowych rozwiązań, jako choćby nawet Stringi :) Pamiętaj, ze DLL nie widzi wywoływanego jej programu, stąd zapis form1.timer1 jest zupełnym nonsensem dla DLL.

ObjectPascal/C - Przeniesienie kodu z C na Object Pascal.

Gdybym dziś musiał, bym podjął próbę zlinkowania C z Pascalem, a samą funkcję zachował w C. Operatory arytmetyczne w C są "surowe", w pacalu mogą być "bezpiecznie" np z kontrolą przepełnień, tu jest prawdziwy unsigned, tam ugłaskany unsigned itd.... Kilkakrotnie przez 25 lat miałem porażki. Pamiętaj o stringach liczonych od 1 Prawdą jest że nie angażuję...

[DELPHI] Tablica array z Stringiem - typ wywołania błąd portu COM

Liczba i opis błędów będą raczej stałe. Otwórz je jako stałe. Nie wiem, czemu chciałbyś je tablicować i w jaki sposób odwoływać się do tej tablicy. Numerami błędów ? [syntax=delphi]const IE_BADID = 'Błąd otwarcia portu COM'; IE_OPEN = 'tekst błędu'; [...] try //operacje na porcie except On E : EBADIDError do StaticText1.Test:=IE_BADID; On E : IEOPENError...

[delphi] [Delphi] Jak dokładnie sprawdzić obecność substringu w stringu?

Ależ jak rozumiem dokładnie to sprawdza, zmień jedną literę i wynik będzie inny (o ile pamiętam zero). Jakoś nie rozumiem pytania, może chodzi o sprawdzenie równości stringów; wtedy wystarczy (str=str).

[c++] [delphi] Implementacja DLL w C++ do użycia w Delphi - czy będzie kompatybilna?

Te rekordy są stałej czy zmiennej długości? Czy znana jest ich ilość? Generalnie, przekazując z/do dll dane można to na kilka sposobów zrobić. Najczęściej preferowany przez MS, to odpytanie DLL o to, ile danych potrzebuje (jeśli nie jest to stały rozmiar), rezerwacja pamięci i przekazanie wskaźnika do tego obszaru, w którym DLL zapisuje, a caller sobie...

BASCOM DELPHI - jak wysłać liczbę Long w 4 bajtach

Zamiast wysyłać przez RS232 binarnie - co często przy przesyłaniu większych porcji danych przez początkujących będzie się kończyło samymi problemami - to nie łatwiej ci zamieniać przesyłane liczby na stringi a po odebraniu ze stringów na liczby. Dzięki temu twoja ramka będzie mogła być po ludzku zakończona znakiem ENTER a co za tym idzie wszystko co...

Delphi - DLL jak przekazywać parametry funkcji PCHAR ?

A przekazywanie typu Pchar nie działa? Zmień stringi na Pchar i nic w strukturze programu sie nie zmieni. Pchar tez jest formą wskaźnika.

Delphi 6 zapis i odczyt danych z pliku – przykład zapisu dwóch zmiennych

kolego no ale gdzie dodałeś? ;) .... ..... form4.Edit8.text := sList.Strings zobacz najpierw próbujesz odczytać coś ze stringlisty i to normalne że wywali się błąd index out of bound bo nie ma do niej nic wczytane najpierw wczytaj zawartość pliku do stringlisty sList.LoadFromFile(NazwaPliku); {dodałem} a potem odczytuj z niej poszczególne stringi form3.label1.caption...

Odczyt temperatur z serwera http na Atmega przez LAN w aplikacji Delphi

Zrobiłem serwer http, który czyta dane wysyłane z atmega (jakieś temperaturki). Jezeli jestes autorem skryptu zapisujacego dane na serwerze i mozesz dopisac sposob odbierania dasnych przez aplikacje w delphi, to mialem podobne doswiadczenia i rozwiazalem to w nastepujacy sposob: - po stronie serwera skrypt php, ktory w zaleznosci od pol zapisywal dane...

Jak wizualizować dane z uC po RS232 w Delphi? Temperatury i przyciski

Czy uC wysyla wszystko jako jeden ciag (tak jak to przedstawiles),czy za kazdym razem krotki string np. temp1=5 ? Ogolnie wszystko rozbija sie na operacjach na stringach (instrukcja Copy(Zmienna:String,PozycjaOdKtorejZaczy... Potrzebyjemy:Integer)). w przypadku gdy wysylasz temp w krotkich stringach i za kazdym razem przechwytujesz...

[Delphi] Jak dodać numer i nazwę do Memo1 z Edit1?

Cześć, bawię się w komendy tekstowe i mam problem z którym nie mogę sobie poradzić już od paru godzin. Chciałbym dodać numer + nazwę do Memo1 po wpisaniu w Edit1 komendy na przyklad w Edit1 wpisuje: /add 1 Michal Klikam OK, w Memo1 pojawia się 1 Michal Jak to zrobić? Zły kod, na którym próbowałem to zrobić: var nr: integer; imie: string; const...

[delphi] Import danych z CSV do bazy Firebird 2.0 w Delphi - jak to zrobić?

Na jakiej wersji Delphi pracujesz? bo całe rozdzielanie jest tutaj dość czasochłonne a można by uprościć. Ponadto nie bardzo mi się podoba mieszanie funckcji pracujacych na null-terminated string ze stringami. Druga rzecz - bezpieczniej jest używać przy konwersji separatora dziesiętnego systemowej zmiennej globalnej DecimalSeparator . Ponadto zamiast...

Polskie litery w Delphi. Zamiast liter pojawiają się opcje.

Dzieki. Teraz jest git :) Mam jeszcze jeden problem. Pisze wlasnie program w delphi, ktory ma duzo zmiennych i chcialbym te zmienne pogrupowac w klasy lub jakies struktury. Na codzien programuje w VisualC++ ale ten program musze zrobic w Delphi i krew mnie zalewa. Robie cos takiego: dane = class nrfab:string; nsi:string end; potem po var: d_o:dane;...

[DELPHI] Jak zaimplementować wyszukiwanie zdjęć w Delphi z folderu programu?

Chyba to przyzwyczajenie, ale z jednej strony obsługa błędów a z drugiej trochę szersze spojrzenie na temat bo mi biblioteka kojarzy się z lista plików wiec potem (o ile dojdzie do tego etapu) to może wpadnie na pomysł, żeby podmieniać Stringi. Dodatkowo widzi w programie co mu się robi no i może nie tylko jedna osoba z tego skorzysta - no cóż taki...

[Visual Studio C++] Jak wysyłać stringi z TrackBar do Arduino przez port szeregowy?

Natomiast co do obsługi np. portu szeregowego pod Win trzeba się zapoznać z WinAPI.... Zapoznać sie z użyciem w .NET. Nie wykonuje tam się żadne "zmienienia API na WinAPI" że niby to port szeregowy. WSZYSTKO jest dostępne obiektowo z C# .NET w sposób spójny bezpieczny, właśnie listenerami jakie zacząłeś pokazywać, tylko musisz je zrozumieć. Np po głębokiej...

Delphi: Jak podzielić string na części i zapisać do tablicy?

nie jestem pewien co do tego momentu: "ss1:=ss Nie wiem do kogo odnosi się ta odpowiedź.Ja zdefiniowałem array zawierający stringi: str:array[1..100]of string;czyli np str[3]='rt'; a skąd wzięło się tab[i-1]:=...........? Skompiluj to co podałem i zobnaczysz że jest OK!

Lazarus/Delphi - Prosty terminal wykrywanie nowej linii

To, że trzeba przetrawić stringi z portu szeregowego to wiem tylko właśnie problem, że na szybko nie znam pascalowskich funkcji do cięcia stringów bo tu zupełnie wszystko inaczej niż w C. Prosiłbym o pomoc w zmianie funkcji wypisującej w memo i w pocięciu tego co zwraca ReadData i znalezieniu tam końca linii. Wielowątkowość nie jest w ogóle tu potrzebna....

Zapis transmisji --> HEX jak to zrobić w DELPHI6?

Mam zapis transmisji ściągnięty z magistrali szeregowej ultra sztuczką magiczką, za pomocą szpecjalnego konwertera. Po otwarciu w programie winhex, bez problemu da się odczytać kolejne ramki tego protokołu. A teraz w czym problem... Chce napisać program (a znam się na obróbce stringów, mam w tym jakieś doświadczenie) tylko nie umiem przerobić tego co...

Jak uzyskać polskie znaki w DBF przy użyciu Delphi BDE?

W plikach DBF, z którymi miałem kontakt, pomagała konwersja z Mazovii. http://www.webmaster.net.pl/informacje/k... Nie znam Delphi - jeśli nie ma tam gotowej funkcji do tego, to zawsze możesz sobie napisać swoją. Nie ma większego sensu przelatywać całej bazy taką funkcją - tylko stringi, które odczytujesz. Kody Mazovii możesz wrzucić...

Delphi - funkcja Pos: wyświetlanie 9 znaków po znalezionym stringu

Dzień dobry. Załóżmy, że mam dwa stringi s1 i s2. Za pomocą funkcji Pos sprawdzam czy s1 występuje w s2 Pos(s1,s2) Po sprawdzeniu okazuje się, że s1 występuje w s2. I teraz chodzi mi o wyświetlenie w Edit1 dziewięciu znaków, które występują w s2 ale bezpośrednio za tym znalezionym s1. Pozdrawiam i proszę o pomoc.

Błąd podczas instalacji INDY 10.0.52 w Delphi 6 Enterprise

No tak. Nie działa juz projekt. Instalacja Service Packa RTL-a i Indy przebiegła wspaniale, bez jakichkolwiek błędów. Syndrom nowoczesnosci i tyle. Pomóźcie mi więc może to zrobic na starszych Indy: http://www.elektroda.pl/rtvforum/topic33... Jazzon ma chyna nowsze Indy bo zamiast UserID u niego było UserName. Powiedzcie dlaczego odbiera mi adres...

Jak posortować dane z pliku w Delphi7 i wyświetlić w Memo?

No to musisz rozdzielić liczby na liczby a tekst jako tekst :) zawsze możesz zmienić moją procedurke type PDane =^TDane; TDane = record cena:real; nazwa:string; end; function Sortowanie(item1,item2:Pointer):integer; begin if PDane(Item1).cena<Pdane(item2).cena then result:=-1 else if Pdane(Item1).Cena>Pdane(item2).Cena then result:=1 else result:=0;...

Delphi - podział programu na moduły, bądz pliki dołączone

W przypadku bibliotek dynamicznych, jak wcześniej pisałem, trzeba zrezygnować z tak wysokiego poziomu abstrakcji na rzecz WinAPI i najlepiej standardów przekazywania parametrów zgodnych z Windows (nie z Delphi), szczególnie tyczy się to stringów. W przypadku funkcji graficznych, jak wcześniej pisałem, trzeba operować na DC obiektów i rysować z użyciem...

Import z DLLa(w Delphi) do C++ jak ??? nagroda 50pkt

Witam, zakładam nowy temat, bardzo proszę o pomoc. Poradziłem juz sobie z samą biblioteką DLL w Delphi a teraz chciałbym wykorzystać jedną z funkcji ale w C++ Bulider. funkcja w DLL napisanym w Delphi ma taką definicję: function ScanStrSP(var Text: PChar; Sep: PChar): PChar; stdcall; i wyeksportowana jest nazwa ScanStrSP . Gdy korzystam z niej w Delphi...

Błąd z funkcją integer przy obliczaniu pierwiastków w Delphi

msg + #13#10 + s to konktatenacja ( łączenie ) stringów msg łączysz z #13#10 ( nowa linia ) i ze stringiem s, który tworzysz za pomocą:Str(x1:0:6, s); x1 - liczba z której tworzysz stringa 0:6 to chyba zakres s - zmienna do któ¶ej zapisujesz to pzdr.

Jak usunąć znaczniki HTML z pliku w Turbo Pascal?

ale char to przeciez pojedynczy znak wiec program odczytajeden znak z calego tekstu... Moznaby zmienic by zmienial za kazdym razem pozycje kursora ale ro ma dzialac w delphi a tam jak sie orientuje to sa jakies klocki ze zmiana pozycji kursora... Poza tym lepiej znam operacje na stringach niz na char'ach... Czy nie dalo by sie jakas usprawnic tego mojego...

Komunikacja USB/RS-232 między Delphi 7 a Arduino - jak to zrobić?

Bzdura. 1.Po to sa zmienne globalne. 2.Podpowiedz do prostoty (i nieskomplikowania) kodu: -string jest jakby tablica, kazda litere w (w tym liczby) mozesz porownac do siebie - znaki od '1' do '9' leza kolo siebie -uzywam tylko operacji na stringach jezeli zmienie kocd na (chyba 4 linie) sprawdzanie dlugosci komendy, to komendy moga miec dowolna ilosc,...

[Turbo Pascal] Jak przenieść program z Turbo Pascal do Delphi z użyciem modułu DOS?

Cos w rodzaju kopiowania. Podaje sciezke da katalogu, z ktorego dane maja byc kopiowane, sciezke do katalogu gdzie dane maja byc kopiowane i w tym drugim katalogu utworzone zostaja wszystkie te same pliki oraz katalogi, z tym ze te utworzone pliki nie zawieraja danych - sa to puste pliki. Funkcje ktore wykozystuje program to: FindFirst, FindNext; funkcje...

Pascal – wczytanie ponad 127 znaków do stringa bez bibliotek i assemblera

Stringi w pascalu zaczynaja sie od 1. Na bajcie zerowym jest dlugosc stringa. maxymalna dlugosc stringow w pascalu, wlasnie z tego powodu to 254 znaki. W delphi zostalo to poszerzone do 32 bitow o ile sie nie myle. Problemem z dodawaniem stringow bedzie to, ze readln czeka na CR, wiec bedzie trzeba dwa razy klepac enter. Natomiast czytanie znak po znaku...

Jak przekonwertować binarną wartość na szesnastkową w Delphi 6?

Witam Moja propozycja jest następująca: mając string z poszczególnymi bitami dzielisz go na kawałki 4-ro znakowe. I wtedy taki czteroznakowy string zamieniasz na odpowiadającą wartość HEX. Potem pobierasz kolejne cztery znaki i znów zamieniasz. Możesz sobie zrobić np. tablicę w której umieścisz np. 100 bitową liczbę. Kolejne dane będziesz pobierał z...

Jak wyświetlić polskie znaki na LCD 4x20 ABC020004B21-BIW-R-01?

Witam Mam wyświetlacz LCD 4x20 (oznaczenie ABC020004B21-BIW-R-01) i chce uzyskać na nim polskie znaki wysyłane jako stringi poprzez czy to port szeregowy i mikrokontroler czy też bezpośrednio przez LPT. Wiem, że ma napewno polskie znaki ale niestety nie mam do niego dokumentacji. Przepuszczałem w programie w Delphi w pętli wszystkie kody znaków od 0-255...

Jak wyświetlić wartość temperatury na LCD w C?

Moim zdaniem 48 wygląda bardziej szpanersko i wogóle jest trendy :D A tak na serio to przesiadałem się z Delphi, gdzie zmienny typu znakowego "char" nie dawały się tak po prostu dodać do liczb i trzeba było stosować konwersję. Następnym raze zwrócę na to uwage ;) A tak na marginesie - orientujecie się, koledzy, czy "profesjonalne" bilbioteki do konwersji...

Delphi rs232 ComPort - Jak odczytać ramkę Byte do tablicy Buffer_I?

Witam. Próbuję odczytać poprzez ComPort ramkę tzn. ze stringami nie ma problemu, ale ramka wysyłana jest w postaci: byte 01 03 00 00 00 02 C4 0B. ComPort.Read(dane, Count); ale jak dane przepisać np. do: Buffer_I : ARRAY [0..20] of byte;

Jakie algorytmy szyfrowania dla danych przesyłanych przez RS?

mialem podobny problem (turcy w hexedytorze pozmieniali wszystki stringi i co gorsze wywalili mnie jako autora) jakie zastosowac szyfrowanie i skorzystelem (w delphi) z tego (metoda ktora podal (at)ja_fryta): function Szyfruj(sString, Password : String) : String; var I : Integer; PassCount : Integer; begin PassCount := 0;...

Visual basic kontrolka serialport jak wysłać chara

Witam Mam taki problem... chcę wysłać chara przez kontrolke serial port w visual basic na port com. W delphi przez przez comporta nie było problemu bo posiada ten komponent funkcję: Przykładowy kod delphi : procedure TFormComPort.TD(a: Byte; b: Byte; c: Byte; d: Byte); begin ComPort.WriteByte(a); ComPort.WriteByte(b);...

Lazarus/Matlab - Jak przesłać dane i uruchomić readfis, evalfis w Matlab R2013a?

No to problem rozwiązany poniżej dla potomnych kod z lazarusa, w Matlabie nic nie trzeba konfigurować. [syntax=delphi] procedure TForm1.Button21Click(Sender: TObject); var MReal, MImage, MatLab : Variant; dupa : integer; begin dupa := 30; Matlab := CreateOleObject('Matlab.Application'... // Cria inst창ncia...

ObjectPascal/Delphi/Lazarus - Utrata danych przy transmisji przy użyciu TComPort

No dobra, to wiele wyjaśnia. Napisałem taką procedurę wg Twoich wskazówek: Dodano po 4 Dodam, że przy takim odbiorze nie zauważyłem ubytków w odebranych danych. Dodano po 9 Rozwinąłem procedurę do takiej: [syntax=c]procedure TMainWindow.SerialRxFlag(Sender: TObject); var RxBuffer: array[1..16] of Byte; c: integer; RevS: String; i: integer; begin Serial.ReadStr(RevS,...

[delphi] Jak w Delphi przekonwertować string base64 na obrazek?

Zacząłem od końca-zrobiłem kodowanie obrazka do base64 Załadowałem obrazek na formę korzystając z OpenPictureDialog ,wrzuciłem na formę komponent z INDY o nazwie IdEncoderMIME1 i dalej kodowanie: procedure TForm1.Button1Click(Sender: TObject); var f : TmemoryStream; begin f := TmemoryStream.Create; try image1.Picture.Graphic.SavetoStream(...

Jak użyć odpowiednika instanceof z Javy w Delphi?

nie wiem jak działa instanceof w javie ale przechowywanie referencji do innych obiektów czy klas to żaden problem. Deklarujesz sobie jakikolwiek obiekt, który zawiera tablicę wskaźników nawet typu Pointer. W najprostszym z możliwych przypadków bierzesz sobie zwykłą i popularną StringList'ę. Można w niej przechowywać zarówno stringi jak i liczby (wielkości...

Jak obsłużyć znaki LF po INPUT w Bascomie przy buforze Serialin?

Witam, jak wiadomo (przynajmniej mi narazie) z helpa Bascoma - zwykłe polecenie PRINT generuje na końcu dwa dodatkowe znaki CR i LF również jak wiadomo polecenie INPUT reaguje na znak CR ... co więc się dzieje ze znakiem LF po instrukcji INPUT jeśli mamy zdefiniowany jakiś bufor: Config Serialin = Buffered , Size = 80 Input String_var Noecho i przylatują...

Dlaczego funkcja LEN(text) zwraca 0 w Bascom AVR? Jak to naprawić?

wielkie dzięki za sugestie, w związku z tym, że dopiero intensywnie uczę się Bascoma, to dlatego nie zawsze jeszcze jestem w stanie na szybko doszukać się odpowiednich poleceń w helpie jak podany przez ciebie Instr ;) również odnośnie tych paramterów $hwstack, $swstack, $framesize i ustalania ich wartości nie jestem jeszcze w pełni świadomy jak z nich...

Delphi - jak wywołać funkcję z parametrem string z DLL i zwrócić string?

Witam, exek ma z dllki wywołać funkcję, do której przekazuję parametr. Parametr jest stringiem i funkcja również ma zwrócić stringa. Kod dllki: [syntax=delphi] function funkcjaDLL(parametr:PChar):PChar:stdcall... var wynik:PChar; begin wynik:=''; wynik:='Dowolny tekst '+parametr+'koniec dowolnego tekstu'; Result:=PChar(wynik); end; exports funkcjaDLL;...

Delphi RS232 - brak odpowiedzi urządzenia, jak poprawnie skonfigurować?

Probowales mimo to ,ze nie mogles ustawic flag uzyskac polaczenie na comport? Kiedys napisalem programik ,ktory komunikowal sie z urzadzeniem ale nie chcial wlasnie wspolpracowac ze standardowym onrxchar. Wklejam tu fragmenty powycinane (postaram sie zeby stanowily jakas calosc) i mozesz sprobowac zrobic wg tego: for i:=1 to 1023 do begin //wysylam...

[Delphi] Jak wczytać dane z TStream do Stringa w SQLQuery?

Witam Naskrobałem następujący kod [syntax=delphi]var // odczytanie strumieniowo danej z bloba ms: TStream; // zdefinioawanie strumienia begin if SQLQuery1.Active then // jesli otwarty SQLQuery SQLQuery1.Close; // to zamknij SQLQuery1.SQL.Clear; // wyczysc pole z zapytniem SQLQuery1.SQL.Text := 'SELECT * FROM tabela WHERE pole = ' + #39 + 'abc' + #39;...

Jak wyodrębnić numer i treść SMS z CRLF w Delphi 7?

Pora zakończyć temat. Ogólnie wszystko zrobiłem, jednak pewne sprawy wykluczają taki sposób pracy z telefonem. Tu trzeba coś lepszego (nowszego) niż AT i obróbka stringów. Pozdrawiam

Asystent elektronika v2.1.0

W PHP również można implementować bazy - nawet lepiej niż w Delphi - dlatego uważam że wersja sieciowa jest bardziej "mobilna". Można ją używać również przez komórkę czego o exe się raczej nie powie :) Jeżeli ktoś bałby się konieczności bycia on-line by używać programu to można udostępnić bazę + pliki php + np. środowisko WAMP i lokalnie odpalić portal...

[Delphi] ZeosLib: brak wyników w Memo1 przy pobieraniu danych z MySQL

Witam. Czy ktoś może rzucić okiem co robię nie tak, w jednym programiku obsługuję tabelę w komponencie ZeosLib i wszystko jest ok, a w drugim jest podobne zapytanie - ale inna tabela i nie wyszukuje mi rezultatów. Używam Delphi 2007 ZEOSDBO-6.6.6-stable z http://zeos.firmos.at/ [syntax=Delphi] Query.Active := False; Query.SQL.Clear; Query.SQL.Add('SELECT...

[AVR][C] jak działać ze stringami lub wskaźnikami

odnośnie zapamiętywania i pobierania stringów z pamięci ROM(flash) to nie mam jakby problemów ale chodzi mi o sposoby obróbki tych "ala" stringów. Tzn po wykładzie kolegi Freedie już czuję o co chodzi ale np tak: w pascalu(delphi) mam taką swoją ulubioną i często potrzebną mi funkcję function ScanStrSP(var Text: string; Separator: string):...

Jak posortować alfabetycznie w TStringGrid w Delphi?

do porównywania stringów służą takie funkcje, jak AnsiCompareStr

Bardzo duzy problem - program z delphi na zaliczenie!

Wczytaj cały plik, usuń ze stringu żądany tekst i nadpisz plik tym stringiem (za pomocą rewrite).

Jak w Delphi przekonwertować hex string na binarny string?

nieco bardziej optymalna wersja (bez jakiegos Power()...) function Hex2Bin(const h : string) : string; const Hex : string = '0123456789ABCDEF'; var i, j, p : Integer; begin Result := ''; for i := 1 to length(h) do begin p := pos(h[i], Hex) - 1; for j := 0 to 3 do begin Result := Result + Chr(Ord('0') + ((p and 8) shr 3)); p := p shl 1; end; end; end;

[Delphi] Odbiór danych RS232 - gubi część ramki

Niestety nic nie rozumiem. To count nie zawiera ilości bajtów jakie siedzą w buforze?? Jaki wpływ na obcinanie paru początkowych bajtów ma to co robię później z odebranym stringiem (zmienna odebrane)??

[c++] Jak poprawnie wywołać funkcję z Delphi DLL w C++?

Dzięki za szybką odpowiedź. Wcześniej były podejmowanie próby uruchomienia dll-ki w C#, sama funkcja command (nota bene jedyna udostępniania przez bibliotekę) byłą wywoływana lecz pojawiał się inny problem w dalszej pracy z dll-ka. Jednak na podstawie sposobu podpięcia funkcji command w c# można wnioskować, że rzeczywiście typy TLnId i TStatus to są...

Jak zamienić string na PAnsiChar w Delphi dla MessageBox?

Witam Sprobuj rzutowac na typ AnsiChar - ja tak zawsze robilem, wolajac funkcje API :) MessageBox(0, PChar('Najwieksza wartosc wlasna to' + #10#13+FloatToStr(w)), PChar('Wartosc wlasna'), MB_OK); Pozdrawiam

Darmowy program do C++ z licencją komercyjną podobny do C++ Builder

W C++ Builder wszystko ... klarowniej Widziałeś kilku/nasto/letni project w tych technologiach? Utrzymywałes go? Combo1, Combo2, Combo3, Combo23. Statyczny wskaźnik na formę (zwykle cienkiemu programiście jedyny znany dostęp do tego obiektu). Eksploatuję program, gdzie od ponad roku nie da się wyeliminować dość widocznego (na produkcji) błędu. w Visual...

Delphi REST.Client.TRESTRequest.Resource jakiego jest typu (konwersja JSON/HTML)

Dziękuję za informację, ale nie do końca o to mi chodziło. Wiem, że tamtejsza property jest stringiem. Interesuje mnie jakaś specyfikacja tego jak ten string jest interpretowany i czym się różni od np. requestowego URL. Nigdzie tego nie mogę znaleźć. Nie ma w dokumentacji Delphi (a przynajmniej ja nie znalazłem) żadnej informacji co tak naprawdę w tym...

[Delphi] Jak pobrać zaznaczony tekst z RichEdit do stringa?

A czemu kasujesz na początek zaznaczony tekst? No zobacz ten swój kod - działa dokładnie tak, jaki wynik dostajesz. Jeśli chcesz wstawić znaczniki do zaznaczonego tekstu to po prostu robisz: <b/> ?

[Delphi] Przepisanie zmiennej string do zmiennej PChar.

To jest typowa metoda konwersji za pomocą rzutowania typów i nie wymaga allokacji pamięci.

TServerSocket jak zidentyfikować połączenie klienta (Delphi)

Witam forumowiczów, piszę program do którego ma łączyć się około 10-12 klientów, do połączenia wykorzystuje TServerSocket (klienci TClientSocket) założenia co do serwera są takie że odpowiada klientowi na wysłaną komendę np: klient wysyła string ?TEMP_CZ1 a serwer odpowiada mu stringiem !TEMP_CZ1:87C. Problem mam właśnie z identyfikacją od jakiego klienta...

DELPHI: Błąd przy przejściu z Form4 do Form5, problem z Label3 i ukrywaniem formy

Ale chcialbym dodac opcje Form4.hide. Jednak pojawia sie bląd. Gdy odpalam program niby okienko Form4 ladnie znika, ale gdy zamykam wszystko pojawia się jakies Okienko CPU z podzialem na 4 czesci, mnostwo liczb, to zdecydowanie jakis blad bo nawet nie powraca do wyjsciowego wygladu (object inspectra itp). U mnie pojawia sie strzalka przy: ntdll.KiFastSystemCallRet:...

[delphi] [Delphi] Jak edytować pierwszą linię w pliku txt bez zmiany reszty?

A może po prostu wczytać cały plik, każdą linijkę jako osobną komórkę tablicy stringów. Zmienić pierwszy element tablicy i zapisać ponownie wszystko do pliku. Nie trzeba nawet używać Memo. Polecam TStringList: http://www.delphibasics.co.uk/RTL.asp?Na...

Jak zadeklarować wspólną zmienną string dla Form1 i Form2 w Delphi?

Zadeklaruj w form1 globalna zmienna np tak: var lancuch:string; A potem z drugiej odwoluj sie tak form1.lancuch:=edit1.text Warotsc z przykladowego pola edit z form2 zostanie przeniesiona do string zadeklarowanego w form1.

Delphi6, przypisanie zmiennej string. Co zrobiłem źle?

Zerknij na to: procedure TForm1.Button1Click(Sender: TObject); var Indeks: integer; begin with ListBox1 do for Indeks:=0 to Count-1 do Application.MessageBox(PChar(Ite... end; Procedura wyświetla MsgBox'y z każdym wpisem zawartym w ListBox'ie. Pozdrawiam...

Delphi 5 - brak reakcji programu po dodaniu zmiennej String w procedurze

Na bank będzie chodzić o uprawnienia... Poza miejscem instalacji są jeszcze katalogi 'Embarcader' w '\Users'. Pamiętaj o zmianie uprawnień wszystkich podrzędnych.

Konwersja danych z ds18b20 na string w Delphi - błędne wartości temperatury

Zacząłbym od tego: Otrzymujesz wartość zmiennej temperatura równą np. 1871819,25. Jak przemnożysz to przez 16 to okaże się, że wyrażenie (temp1 + (temp2*256)) zwraca wartość 29 949 108. Teoretycznie zmienne temp1 i temp2 nie powinny przyjmować wartości większych od 255, więc wartość maksymalna wyrażenia (temp1 + (temp2*256)) = (255 + (255*256)) = 65535....

C++ Builder 6.0 i RS232 wykrywanie znaku <NL>

Dopóki nie przyjdzie enter, tekst powinieneś dopisywać do ostatniej linijki, zamiast cały czas dodawać nowe linie. W Delphi dostęp do tekstu wyświetlanego w TMemo jest możliwy przez kolekcję stringów TMemo.Lines - w builderze powinno być podobnie. Po przejrzeniu helpa o komponencie memo rozwiązanie powinno nasunąć się samo ;)

[VB/Delphi] wszystkie możliwe równania X zmiennych

No to niech będzie nawet 100 milionów ale nie musisz tego przecież wszystkiego wyświetlać.Wszystkie kombinacje możesz zapisywać do jakiegoś stringa albo kilku stringów i wyświetlać tylko pojedyncze bloki które będą cie interesowały.np string1 będzie przechowywał pierwszych tysiąc kombinacji string2 drugi tysiąc itd.

[Delphi 7] - Przesyłanie wsadu przez port COM do bootloadera - konwersja stringu

Zapisz sobie cały ciąg do pliku, np. w ten sposób : http://obrazki.elektroda.pl/8273523500_1...

Delphi – jak zapisać i odczytać rekord (record) do pliku bez użycia tablicy?

Napisz fragment kodu dla przykładu. coś ze starych zasobów [syntax=pascal]Program BazaTeleadresowa; Uses Crt; type TData = record {definicja typu danych strukturalnego} Imie: String[10]; {dane - stringi o okreslonej dlugosci} Nazwisko: String[15]; Tel: String[12]; Ulica: String[20]; Mieszkanie: String[5]; Miasto: String[15]; Kod: String[5]; end; const...

AVR Boot Loader - który ładnie i szybko działa / USB

JmL(TM) --> z tą nazwą procka to już sobie poradziłem tak, że wysyłam ją jako string wprawdzie ale nie deklaruję jej już w programie (tak jak było widać to wyżej) - tylko leci nazwa procka podana w makefile, a to dzięki takiej konstukcji: #define STRINGIFY(x) #x #define TOSTRING(x) STRINGIFY(x) uart_putstr("\r\n"...

Delphi 5: Konwersja stringa z TComPort na integer - błąd usuwania #13#10

Nie znam delphi, ale nazwa ReadLine sugeruje czytanie do napotkania konca linii (pewnie ta funkcja czeka, az przyjdzie koniec linii). Podobnie ReadUntil(koniec) - podaje się znak końcowy. Będzie to miało drobną wadę - funkcja ComPortRxChar. będzie mogła się zatrzymać na moment, ale skoro przyszedł początek do reszta nadejdzie w ciągu ułamka sekundy...

[delphi 7] hexedytor głownie procedura zapisu hexu

Powtarzam - prezentacja hex służy wyłącznie do celów PREZENTACYJNYCH. Chcą wyświetlić plik, wczytujesz go i prezentujesz w takim formacie, lecz właściwą treść trzymasz albo w tablicy bajtów, albo też sam plik trzymasz otwarty. Konwersja na hex na potrzeby zmiany by zapisać spowrotem jest procesem czasochłonnym i niepotrzebnym. Notabene są gotowe komponenty...

Jak wyszukać i wyświetlić linię z Memo1 w Delphi po numerze w Edit1?

Zadanie banalne - nieco pewniej można zrealizować, a dodatkowo jeśli chcesz tylko nazwę ulicy, to: var i,p2: Integer; begin with Memo1.Lines do for i:=0 to Count-1 do if (Copy(Strings[i],1,Pos&#... -',Strings[i]))=Edit1.Te... then begin p2:=Pos('- ',Strings[i])+2; Edit2.Text:=Copy(Strings[i&#...

Delphi XE8 .Zamiana pozycji kursora x na piksel (memo).

A czy można w jakiś prosty sposób ustawić kursor w pozycji x,y na memo, po to żeby pózniej w to miejsce wstawić zawartosc stringa? coś na wzór memo1.pozycja x y , . ? Po prostu chciałbym żeby do czystego memo powstawiać w rózne miejsca kilka stringów tzn w rożne wiersze od rożnych kolumn . Dlaczego tak: [syntax=delphi] a:=inttostr(memo1.CaretPos.x);...

Jakie programy do deszyfrowania tekstu w Delphi polecacie?

Witam, sorry za taki może troszkę dziwny temat ale jestem zielony jeśli chodzi o techniki i algorytmy służące do deszyfracji. mam pytanie czy ktoś może mi podpowiedzieć jakieś stronki bo jakoś sam nie mogę nic dobrego znaleźć, albo dać znać czy są jakieś chociaż ogólnodostępne programy, które podejmują się prób deszyfracji jakiejś zakodowanej wiadomości?...

DELPHI. Jak przekazać listę indeksów jako parametr do zapytania SQL w Delphi?

W większości bibliotek nad warstwą SQL w różnych językach nie ma takiego czegoś dla IN () . Spotkałem tylko raz, ale to bardziej wysokopoziomowe obiektowe rozwiazanie w Javie Tam świadomie się podaje List i lista jest prawidłowo bindowana w takim miejscu Dwie wiadomości, dobra i zła a) trzeba sklejać ze stringów b) o ile będzie operarować na zmiennych...

Delphi - Jak usuwać dane z TStrings w TMemo przy przekroczeniu limitu?

Bardzo dziękuję, działa:) Pytanie tylko mam do tego: skoro maksymalna ilość znaków przechowywana w TStrings określana tu jest limitem pola TMemo.MaxLength, to najlepiej byłoby znaleźć jakąś metodę która zwraca obecną ilość znaków w TStrings'ie, coś w stylu: while Memo1.Lines.ObecnaIlośćZnaków > Memo1.MaxLength do Memo1.Lines.Delete(0); i...

[Delphi] Jak przekonwertować string szesnastkowy na Cardinal w Delphi?

Mam pewien problem.. Bo zmienna Cardinal może przechowywać też liczby w trybie szesnastkowym. Np $386AD76. Problem tkwi w tym że chciałbym że np w Edit podaję "386AD76" a on mi to zapisuje do zmiennej cardinal. Jak to zrobić?

Delphi: Jak poprawnie zapisać 'AnsiString' do 'TStrings *' w Memo1?

Znałem takie jedno fajne C. Nazywało się C64 - dobre dla "początkującego, zielonego" programisty i można też było sobie pograć... Na poważnie. Błąd o którym piszesz wynika z tego że TStrings to tablica wielu stringów, a ty chcesz żeby to się równało 1 stringowi. Ten błąd pewnie wystąpi bez względu na język programowania jaki wybierzesz. W Delphi to...

[delphi] Jak sprawdzić modyfikację zmiennej string w Delphi?

Witam W programie do zmiennych przypisuje zawartość z label. s:string; s:=label1.caption; Załózmy, że na początku zawartość label to - poznan12 po kliknięciu w button label zmienia się na - poznan34 Czy można sprawdzić czy string uległ modyfikacji ??

[Delphi]ComPort - wysyłanie bajtowe, a nie string?

Wpisuję: Int := 1 + #13#10; ComPort1.Write(Int); Wpisz : var int : array[0..2] of byte; begin int[0]:=1; int[1]:=13; int[2]:=10; ComPort1.write(int,3); end;

[Delphi] Jak wstawić n spacji na początku stringa?

StringOfChar(' ',n)+ i właśnie o to mi chodziło, wiedziałem że coś takiego musi być :)

Delphi - Synapse - jak utworzyć katalog na Chomiku (Java/json)

Witam. Walczę już kilka dni i ciągle nic. W AutoIt wystarczyło dosłownie kilka linijek i katalog utworzył się na Chomiku bez problemu. A w Delphi 7 + Synapse, w którym piszę ciągle dostaję odpowiedź <500 Internal Server Error>. Poniżej gotowy kod, który loguje do Chomika prawidłowo, prawidłowo "klika" w ikonkę dodaj folder (jest prawidłowa odpowiedź),...

Delphi: Jak znaleźć pozycję wzorca -??: w stringu?

jak znaleźć w delphi pozycję stringa "-??:" gdzie ? to dowolna cyferka? Może jest to banalne, ale ja nie umiem do tego dojść ani nigdzie znaleźć! ;( czyli tak: znak "-" potem dwie cyferki a potem znak ":" Pozdrawiam

Jak przekonwertować Integer i Boolean na String w Delphi?

Jak zmienić Integer, boolean na String ??????? Delphi

[Delphi] Delphi: Jak sprawdzić, czy tekst z TEdit występuje w zmiennej typu string?

if edit1 = znaki then ? W zmiennej jest zapisane wiele szyków znaków w formie xxxxxxxxx zzzzzzzzz yyyyyyyy itd. Ma to sprawdzić obojętnie które hasło pasuje, jeżeli jakiś szyk jest w zmiennej. Bo do zmiennej wczytuje plik txt.

[Delphi] Delphi: Automatyczna zamiana znaków w pliku tekstowym z użyciem Replace i RichEdit

Witam. Chciałbym zrobić automatyczny Replace, żeby zamieniał automatycznie litery na zamienniki. Mogło by to działać w ten sposób: RichEdit1.Lines.SaveToFile('aa.txt'); // to co wpiszę w RichEdit1 po kilknięciu w przycisk zapisuje do pliku aa.txt << formułka dla ReplaceDialog by podmieniał w aa.txt np. ze stringów 'a' na 'b', 'c' na 'd' etc. >>...

[Delphi] - Umieszczenie pliku .pas jako stringu w zmiennej

Korzystam z JvInterpretatora który umożliwia wykonywanie kodu Delphi napisanego w skompilowanej już aplikacji. Niestety, z tego co widzę to dodawanie unitów z których chce się skorzystać jest utrudnione. Polega to na napisaniu unitu w procedurze GetUnitSource samego interpretatora, np.: Source była cała jego treść. Próbuję zrobić coś takiego ale nie...

[Delphi] Jak znaleźć drugie wystąpienie wyrazu w stringu?

To również przemyślałem ale ciąg znaków zmienia swoją liczebność Najlepiej był by gdyby dało przeszukiwać się od końca Jest taka możliwość :?:

ATMEGA32 i DELPHI 7 - Błąd EConvertError przy konwersji String na Float

Separator wstawiony. Załączam plik (3) ze screen'em gdzie zatrzymuję się komponent CPort. Plik (4) - spróbowałem usunąć linię, która wyłącza zawijanie wiersza w memo: Str:=Memo.Lines[Memo.Lines.Count-2+Ord(P... Zamieniłem na próbę: Memo.Lines.Add(Str); [syntax=delphi] procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer); var P,...

Jak wyciągnąć wiele liczb ze stringa w Delphi przy użyciu TComport?

Dzięki, działa świetnie, przy wyświetleniu pierwszej linii w Memo, kolejne linie, które się pojawiają w memo nie są aktualizowane w Lebel*.text, pewnie to banalne ale ja dopiero zaczynam w delphi, poniżej fragment kodu. begin ComPort1.ReadStr(Str, Count); Memo1.Text := Memo1.Text+Str; st:=TStringList.Create; try st.Delimiter:='|';...

[Delphi7] Problem z łączeniem i długością stringów z RS232

Witam mam problemik ComPort.ReadStr(Str, Count); Pom:=Pom+Str; a:=Length(Pom); If a=66 then L:=Pom; LabelA.Caption:='Czas:......'+co... LabelB.Caption:='Namiary A:......'+copy(L,15,14); Jak widzimy w powyszym kodzie planuje nadchodzace dane z RS232 ( Str ) dodac do siebie tak aby powstal...

Jak przypisać wartość do pola rekordu w Delphi używając zmiennej string?

Witam, pojawił sie u mnie pewien problem, którego nie potrafię przejść, jeśli to w ogule wykonalne to proszę o pomoc. Mianowicie: type wykaz=record A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,... end; var tab:array of wykaz; dd:string; begin SetLength(Tab,3); dd:='A'; tab .dd :=123; // i tu jest problem, jak użyć wartości zmiennej dd jako...

Delphi7 - konwersja string na real i zaokrąglanie do 2 miejsc po przecinku

Witam Pisałem na innym forum i nikt nie odpowiedział (albo takie łatwe albo takie trudne) Mam problem jak zamienić string na real. Przykład. String to 12.73863 - jak to zamienić na real Jak zaokrąglic do 2-uchmiejsc po przecinku. Dzięki

Delphi7, MS Access, ADO - błąd konwersji Null na String przy pierwszym połączeniu

Witaj Podaj strukturę tabeli. Może używasz jakiegoś pola typu autoinc?